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USER'S GUIDE STATEMENT 

"This equipment generates and uses radio frequency energy. If it is 
not properly installed and used in strict accordance with the manufac- 
turer's instructions, this equipment may interfere with radio and tele- 
vision reception. This machine has been tested and found to comply 
with the limits for a Class B computing device peripheral in accord- 
ance with the specifications in Subpart J of Part 15 of FCC Rules, 
which are designed to provide reasonable protection against such 
interference in a residential installation. If you suspect interference, 
you can test this equipment by turning it off and on. If you determine 
that there is interference with radio or television reception, try one 
or more of the following measures to correct it: 

• reorient the receiving antenna 

• move the equipment away from the receiver 

• change the relative positions of the equipment and the receiver 

• plug the equipment into a different outlet so that the equipment 
and the receiver are on different branch circuits. 

If necessary, consult your Commodore dealer or an experienced radio/ 
television technician for additional suggestions. You may also wish to 
consult the following booklet, which was prepared by the Federal 
Communications Commission: 

"How to identify and Resolve Radio -TV Interference Problems". 
This booklet is available from the U.S. Government Printing Office, 
Washington, D.C. 20402, Stock No. 004-000 00345-4. 
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The information in this manual has been reviewed and is believed to be entirely 
reliable. No responsibility, however, is assumed for inaccuracies. The material in [his 
manual is for information purposes only, and is subject to change without notice. 

©Commodore Business Machines Electronics Ltd., September 1982 
"All rights reserved." 
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1. GENERAL DESCRIPTION 

INTRODUCTION 

Welcome to the fastest, easiest, and most efficient filing system available for your 
Commodore 64 or VIC 20 computer, your 1541 DISK DRIVE. This manual has been 
designed to show you how to gel the most from your drive, whether you're a beginner 
or an advanced professional. 

If you arc a beginner, the first few chapters will help you through the basics of 
disk drive installation and operation. As your skill and programming knowledge im- 
proves, you will find more uses for your disk drive and the more advanced chapters of 
this manual will become much more valuable. 

If you're a professional, this reference guide will show you how to put the 1541 
through its paces to perform just about all the disk drive jobs you can think of. 

No matter what level of expertise you have, your 1541 disk drive will dramatically 
improve the overall capabilities of your computer system. 

Before you get to the details of 1541 operation, you should be aware of a few im- 
portant points. This manual is a REFERENCE GUIDE, which means that unless the 
information you seek directly pertains to the disk or disk drive you will have to use 
your Commodore 64 or VIC 20 User's Guides and Programmer's Reference Guides to 
find programming information. In addition, even though we give you step- by-step in- 
structions for each operation, you should become familiar with BASIC and the in- 
structions (called commands) that help you operate your disks and drives. However, if 
you just want to use your disk drive unit to load and save prepackaged software, we've 
included an easy and brief section on doing just that. 

Now . . , let's get on with the general information. 

The commands for the disk drive come in several levels of sophistication. Starting 
in chapter three, you can learn how the command that allow you to SAVE and LOAD 
programs with the disk work. Chapter four teaches you how commands are sent to the 
disk, and introduces the disk maintenance commands. 

Chapter five tells you how to work with SEQuential data files. These are very 
similar to their counterparts on tape (but much faster). Chapter six introduces the com- 
mands that allow you to work with random files, to access any piece of data on the 
disk, and how you organize the diskette into tracks and blocks. Chapter seven 
describes the special relative files, RELative files are the best method of storing data 
bases, especially when they are used along with sequential files. 

Chapter eight describes methods for programming the disk controller circuits at 
the machine language level. And the final chapter shows you how to change the disk 
device number, by cutting a line inside the drive unit or through software. 



Remember, you don't really need to learn everything in this book all at once. The 
first four chapters are enough to get you going, and the next couple are enough for 
most operations, Getting to know your disk drive will reward you in many ways — 
speed of operation, reliability, and much more flexibility in your data processing 
capabilities. 

SPECIFICATIONS 

This disk drive allows you to store up to 144 different programs and/ or data Tiles 
on a single mini- floppy diskette, for a maximum of over 174,000 bytes worth of infor- 
mation storage. 

Included in the drive is circuitry for both the disk controller and a complete disk 
operating system, a total of 16K of ROM and 2K of RAM memory. This circuitry 
makes your Commodore 1541 disk drive an "intelligent" device. This means it does its 
own processing without taking any memory away from your Commodore 64 or VIC 20 
computer. The disk uses a "pipeline" software system. The "pipeline" makes the disk 
able to process commands while the computer is performing other jobs. This 
dramatically improves the overall throughput (input and outpu') of the system. 

Diskettes that you create in this disk drive are read and write compatible with 
Commodore 4040 and 2031 disk drives. Therefore, diskettes can be used inter- 
changeably on any of these systems. In addition, this drive can read programs created 
on the older Commodore 2040 drives. 

The 1541 disk drive contains a dual "serial bus" interface. This bus was specially 
created by Commodore. The signals of this bus resemble the parallel IEEE-488 inter- 
face used on Commodore PET computers, except that only one wire is used to com- 
municate data instead of eight. The two ports at the rear of the drive allows more than 
one device to share the serial bus at the same time. This is accomplished by "daisy- 
chaining" the devices together, each plugged into the next. Up to five disk drives and 
one printer can share the bus simultaneously. 



Figure 1.1 Specifications VIC 1540/1541 Single Drive Floppy Disk 



STORAGE 



Total capacity 

Sequential 

Relative 

Directory entries 
Sectors per track 
Bytes per sector 
Tracks 
Blocks 



17484S bytes per diskette 

168656 bytes per diskette 

167132 bytes per diskette 

65535 records per Tile 

144 per diskette 

17 to 21 

256 

35 

683 (664 blocks free) 



IC's: 



6502 
6522 (2) 



microprocessor 
I/O, internal timers 



Buffer 
2114 (4) 



2K RAM 



PHYSICAL: 



Dimensions 
Height 
Width 
Depth 



97 mm 
200 mm 
374 mm 



Electrical: 



Power Requirements 
Voltage 
Frequency 
Power 



100, 120, 220, or 240 VAC 
50 or 60 Hertz 
25 Watts 



MEDLA: 

Diskettes 



Standard mini 5\A", single sided, 
single density 



2. UNPACKING AND CONNECTING 
CONTENTS OF BOX 

Included with the 1541 disk drive unit, you should find a gray power cable, biack 
serial bus cable, i his manual, and a demonstration diskette. The power cable has a con- 
nection for the back of the disk drive on one end, and for a grounded (three-prong) 
electrical outlet on the other. The serial bus cable is exactly the same on botli ends. It 
has a 6-pin DIN plug which attaches to the VIC 20, Commodore 64 or another disk 
drive. 



Please, don't hook up anything until you've completed the following section! 



Figl.A 
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DRIVE INDICATER (RED LED) 

LIGHT: ACTIVE 
FLASH: ERROR 
POWER INDICATER 

Fig I. Front Panel "[GREEN led) light: power on 
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DOOR LEVER 

DRIVE INDICATER (RED LED) LIGHT: ACTIVE 
FLASH: ERROR 



POWER INDICATER 

(GREEN LED) LIGHT: POWER ON 



Fig 2. Back Panel powe r switch 



SERIAL BUS 




•" 



FUSE/HOLDER 



CONNECTION OF CABLES 

Your first step is to take the power cable and insert it into the back of the disk 
drive (see figure 2). It won't go in if you tiy to put it in upside down. Once it's in the 
drive, plug the other end into the electrical outlet. If the disk drive makes any sound at 
this time, please turn i! off using the switch on the back! Don' I plug any other cables 
into the disk drive if the power is on. 

Next, take the serial bus cable and attach it to either one of the serial bus sockets 
in the rear of the drive. Turn off the computer, and plug the other end of the cable into 
the back of the computer. That's all there is to it! 

If you have a printer, or any additional disk drives, attach the cables into the se- 
cond serial bus port (see figure 3). For directions on using multiple drives at one time, 
read chapter 9. If you are a first-time user with more than one drive, start working with 
only one drive until you're comfortable with the unit. 




Fig 3. Floppy Disk Hookup 



Printer 



POWERING ON 

When you have all the devices hooked together, it's time to start turning on the 
power. II is important that you turn on Hie devices in the correct order. The computer 
should always be turned on last. As long as the computer is the last one to be turned 
on, everything will be OK. 

First, make sure that you've removed all diskettes from the disk drives 
before powering on. 

After all the other devices have been turned on, only then is it safe to turn on the 
computer. All the other devices will go through their starting sequences. The printer's 
motor goes on, with the print head moving halfway across the line and back again. The 
1541 disk drive will have its green light on, and then the red drive/error light will blink, 
while your TV screen forms the starting picture. 

Once the red drive/ error light has stopped flashing on the drive, it is safe to begin 
working with it. 



WRITE 

PROTECT 

NOTCH 



WHEN COVERED. DISKETTE 
CONTENTS CANNOT BE 
ALTERED 




Fig,4, Position for Diskette Insertion 



INSERTION OF DISKETTE 

There is different way to open and close the drive doo:, and insertion/ 
removal the diskette, 

TYPE1: figure l.A 

To open the door on the drive, simply press the door catch lightly, and the 
door will pop open. If there is a diskette in the drive, it is ejected by a small 
spring. Take the diskette to be inserted, and place it in the drive face-up with the 
large opening going in first and write-protect notch to the left (covered with tape 
in the demonstration disk) (see figure 4). 

Press it in gently, and when the diskette is in all the way, you will feel a click 
and the diskette will not spring out. Close the drive door by pulling downward 
until the latch clicks into place. Now you are ready to begin working with the 
diskette. 

TYPE2: figure l.B 

To open the door on the drive, simply turn the door lever counter-clockwise. 
Take the diskette to be inserted, and place it in the drive face-up with the large 
opening going in first and write-protect notch to the left (covered with tape in 
the demonstration disk) (see figure 4). 

Close the drive door by turning clockwise direction untii the latch clicks 
into place. Now you are ready to begin working with the disk. 

Remember to always remove the diskette before the drive is turned off or on. 
Never remove the diskette when the red drive light in on! Data can be destroyed by the 
drive at this time! 

USING WITH A VIC 20 OR COMMODORE 64 

The 1541 Disk Drive can work with either the VIC 20 or Commodore 64 com- 
puters. However, each computer has different requirements for speed of incoming 
data. Therefore, there is a software switch for selecting which computer's speed to use. 
The drive starts out ready for a Commodore 64. To switch to VIC 20 speed, the follow- 
ing comand must be sent after the drive is started (power-on or through software): 

OPEN 15, 8, 15. "UI-": CLOSE 15 

To return the disk drive to Commodore 64 speed, use this command: 

OPEN 15, 8, 15, "UI + ": CLOSE 15 

More about using this type of command is in chapter 4, with a detailed explana- 
tion of the U (user) commands in chapter 8. 



3. USING PROGRAMS 

LOADING PREPACKAGED PROGRAMS 

For those of you interested in using only prepackaged programs available on car- 
tridges, cassette, or disk, here's all you have to do: 

Using your disk drive, carefully insert the preprogrammed disk so that the label on 
the disk is facing up and is closest to you. Look for a little notch on the disk (it might 
be covered with a little piece of lape). If you're inserting the disk properly, the notch 
will be on the left side. Once the disk is inside, close the protective gate by pushing in 
on the level. Now type LOAD "PROGRAM NAME", 8 and hit the FUttiUflM kev. 
The disk will make noise and your screen will say: 



SEARCHING FOR PROGRAM NAME 
LOADING 

READY 



When the word READY appears, just type RUN, and your prepackaged software 
is ready to use. 

LOAD 

The BASIC commands used with programs on the disk drive are the same as the 
commands used on the Commodore DATASSETTE™ recorder. There are a few extra 
commands available for use with disks, however. 

First of all, the program name must be given with each command. On a 
DATASSEi Tb™, you could omit the program name in order to just LOAD the first 
program there. On disk, since there are many different programs that are equally ac- 
cessible, the program name must be used to tell the disk drive what to do. In addition, 
the disk drive's device number must be specified. If no device number is listed, the 
computer assumes the program is on tape. 

FORMAT FOR THE LOAD COMMAND; 

LOAD nameS, device/?, commands 

The program name is a string, that is, either a name in quotes or the contents of a 
given string variable. Some valid names are: "HELLO", "PROGRAM #1", AS, 
NAMES. 



The device* is preset on the circuit board to be #8. If you have more than one 
drive, see chapter 9 on how to change the device number. This book assumes that 
you're using device number 8 for the disk drive. 



The commands is optional. If not given, or zero, the program is LOADed nor- 
mally, that is, beginning at the start of your available memory for BASIC programs. If 
the number is 1 , the program will be LOADed at exactly the same memory locations 
from which it came, in the case of computers with different memory configurations, 
like VICs with 5K, 8K, or more memory, the start of BASIC memory is in different 
places. The commands permits BASIC programs to LOAD normally. Commands 1 
is used mainly for machine language, character sets, and other memory dependent 
functions. 

EXAMPLES 

LOAD "TEST", 8 

LOAD "Program # 1", 8 

LOAD AS. J , K 

LOAD "Mach Lang", 8, 1 



NOTE: You can use variables to represent device numbers, commands, and 
strings, as long as you've previously defined them in your program. 



DIRECTORY OF DISKETTE 

The DATASSETTE™ tape deck is a sequential device. It can only read from the ■ 
beginning of the tape to the end, without skipping around the tape and without the 
capability of going backward or recording over old data. 

Your disk drive is a random access device. The read/write head of the disk can go 
to any spot on the disk and access a single block of data which holds up to 256 bytes of 
information. There are a total of 683 blocks on a single diskette. 

Fortunately, you don't really have to worry about individual blocks of data. 
There is a program in the disk drive called the Disk Operating System, or the DOS. 
This program keeps track of the blocks for you. It organizes them into a Block 
Availability Map, or BAM, and a directory. 

The Block Availability Map is simply a checklist of all 683 blocks on the disk. It is 
stored in the middle of the diskette, halfway between the center hub and the outer rim. 
Every time a program is SAVEd or a data file is CLOSEd, the BAM is updated with 
the list of blocks used up. 

The directory is a list of all programs and other files stored on the disk. It is 
physically located right next to the BAM. There are 144 entries available in the direc- 
tory, consisting of information like file name and type, a list of blocks used, and the 
starting block. The directory is automatically updated every time a program is SAVEd 



or a file is OPENed for writing. BEWARE: the BAM isn't updated until the file is 
CLOSEd, even though the directory changes right away. If a file isn't CLOSEd pro- 
perly, all data in that file will probably be lost. 

The directory can be LOADed into your memory just like a BASIC program. 
Place the diskette in the drive, and type the following command: 

LOAD "$", 8 

The computer responds with: 



SEARCHING FQRS 



FOUND S 



LOADING 



READY. 



Now the directory is in your computer's memory. Type LIST, and you'll see the 
directory displayed on the screen. To print the directory on your printer, type the 
following command line (in this example your printer is plugged in as device^ 4): 

OPEN 4, 4: CMD 4: LIST 



NOTE: When using CMD, the file must be closed using the command PRINTS 
4: CLOSE 4. See the VIC 1525/1515 printer manual for detailed explanation. 



To read the directory without LOADing it into your memory, see the section later 
in this chapter on the DOS Support Program, In addition, to examine the directory 
from inside a BASIC program, sec the section in chapter 5 that deals with the GET# 
statement. 
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PATTERN MATCHING AND WILD CARDS 

When using the tape deck, you can LOAD any program starting with certain let- 
ters just by leaving off any following letters. Thus, the command LOAD "T" will find 
the first program on the tape beginning with the letter T. And LOAD "HELLO" will 
find the first program beginning with the letters HELLO, like "HELLO THERE." 

When using the disk, this option is called pattern matching, and there is a special 
character in the file name used to designate this. The asterisk (*) character 
following any program name tells the drive you want to find any program Start- 
ing with that name. 

FORMAT FOR PATTERN MATCHING: 

LOAD nameS 



In other words, if you want to LOAD the first program on the disk starting with 
the letter T, use the command LOAD "T**\ 8. 

If only the "* is used for the name, the last program accessed on the disk is the 
one LOADed. If no program has yet been LOADed, the first one listed in the directory 
is the one used. 

You are probably familiar with the concept of wild cards in poker where one card 
can replace any other card needed. On your 1541, the question mark (?) can be used as 
a wild card on the disk. The program name on the disk is compared to the name in the 
LOAD command, but any characters where there is a question mark in the name aren't 
checked. 

For instance, when the command LOAD "T?NT", 8 is given, programs that 
match include TINT, TENT, etc. 

When LOADing the directory of the disk, pattern matching and wild cards can be 
used to check for a list of specific programs. If you gave the command LOAD 
"SO: TEST", only the program TEST would appear in the directory (if present on the 
disk). The command LOAD "S0:T*° would give you a directory of all programs 
beginning with the letter T. And LOAD "$0:T?ST" would give you all the programs 
with 4-letter names having the first letter of T and the third and fourth letters ST. 
LOAD "$0:T?ST*" would give names of any length with the correct first, third, and 
fourth letters. 
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SAVE 

To SAVE a program to the diskette, all that is needed is to add the device number 
after the program name. Just like the SAVE command for the tape deck, the device 
number can be followed by a command number, to prevent the automatic re-location 
on LOADing (see the section on the LOAD command, above). 

FORMAT FOR THE SAVE COMMAND: 

SAVE nameS, devke#, commands 

See the LOAD command (page 10) for an explanation of the parameters device# 
and command#. 

When you tell the disk drive to SAVE a program, the DOS must take several 
steps. First, it looks at the directory to see if a program with that name already exists. 
Next it checks to see that there is a directory entry available for ihe name. Then it 
checks the BAM to see if there are enough blocks in which to store the program. If 
everything is OK up to this point, the program is stored. If not, the error light will 
Hash. 



SAVE AND REPLACE 

If a program already exists on the disk, it is often necessary to make a change and 
re-SAVE it onto the disk. In this case, it would be inconvenient to have to erase the old 
version of the program and then SAVE it. 

If the first characters of the program name are the "@" sign followed by a and 
a colon (:), the DOS knows to replace any old program that has that name with the 
program that is now in the computer's memory. The drive checks the directory to find 
the old program, then it marks that entry as deleted, and it next creates a new entry 
with the same name. Finally, the program is stored normally. 

FORMAT FOR SAVE WITH REPLACE: 

SAVE "@0:" + nameS, device# t commands 

For example, if a file was called TEST, the SAVE and replace command would be 
SAVE "@0: TEST", 8. If the name is in AS, the command is SAVE AS + *'@0: 
TEST", 8. 



The reason for the 0: is to keep compatibility with other Commodore disk 
drive units which have more than one drive built in. In that case, the number 
or 1 is used to specify which drive is being used. 
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VERIFY 

The VERIFY command works to check the program currently in memory against 
the program on disk. You must include a device# with the VERIFY command. The 
computer does a byte-by-byte comparison of the program, including line links — 
which may be different for different memory configurations. For instance, if a pro- 
gram was SAVEd to disk from a 5K VIC 20, and re-LOADed on an 8K machine, it 
wouldn't VERIFY properly because the links point to different memory locations. 

FORMAT FOR VERIFY COMMAND: 

VERIFY name$, device* 

DOS SUPPORT PROGRAM 

On your demonstration disk, there may be a program called DOS SUPPORT. 
This program, also called a wedge, allows you to use many disk commands more easily 
(different wedges are used for the VIC 20 and the Commodore 64). Just LOAD the 
program and RUN it. It automatically sets itself up and erases itself when it's finished. 
You'll have a few hundred less bytes to work with when this program is running, but 
you'll also have a handy way to send the disk commands. 

As a result of the DOS Support, the "/"key now takes the place of the LOAD 
command. Just hit the slash followed by the program name, and the program is 
LOADed, When you use this method, you don't need to use the LOAD command or 
the comma 8. 

The "@" and " > " keys are used to send commands lo the disk drive. If you 
type @S (or > $), the directory of the disk is displayed on the screen, without 
LOADing into your memory! These keys also take the place of the PRINT# (see 
chapter 4) to send commands listed in the next chapter. 

To read the error channel of the disk (when the red error light is blinking), just hit 
either the @ or the > and hit RETURN Key. The complete error message is dis- 
played to you: message number, text, and track and block numbers. 
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4. DISK COMMANDS 

OPEN AND PRINT # 

Up 'til now, you have explored the simple ways of dealing with the disk drive. In 
order to communicate with the disk drive more fully, you have to touch on the OPEN 
and PRINTS statements in BASIC (more details of these commands are available in 
your VIC 20 or Commodore 64 User's Guide or Programmer's Reference Guide). You 
may be familiar with their use with data files on cassette tape, where the OPEN state- 
ment creates the file and the PRINTS statement fills the file with data. They can be 
used the same way with the disk, as you will see in the next chapter. But they can also 
be used to set up a command channel. The command channel lets you exchange infor- 
mation between the computer and the disk drive. 

FORMAT FOR THE OPEN STATEMENT: 

OPEN file#, device*, channel*, tcxt$ 

The fileS can be any number from 1 to 255. This numbe: is used throughout the 
program to identify which file is being accessed. But numbers greater than 127 should 
be avoided, because they cause the PRINTS statement to generate a linefeed after the 
return character. These numbers are really meant to be used with non-standard 
printers. 

The device* of the disk is usually 8, 

The channel* can be any number from 2 to 15. These refer to a channel used to 
communicate with the disk, and channels numbered and 1 are reserved for the 
operating system to use for LOADing and SAVEing, Channels 2 through 14 can be 
used for data to files, and 15 is the command channel. 

The texts is a string that is PRINTed to the fiie, as if with a PRINT* statement. 
This is handy for sending a single command to the channel. 

EXAMPLES OF OPEN STATEMENTS 

OPEN 15, 8, 15 

OPEN 2, 8, 2, 

OPEN A, B, C, Z$ 
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The PRINTS command works exactly like a PRINT statement, except that the 
data goes to a device other than the screen, in this case to the disk drive. When used 
with a data channel, the PRINTS sends information into a buffer in the disk drive, 
which LOADs it onto the diskette. When PRINTS is used with the command channel, 
it sends commands to the disk drive. 

FORMAT FOR SENDING DISK COMMANDS: 

OPEN 15, 8, 15, commands 
or 

PRINTS 15, commands 



NEW 

This command is necessary when using a diskette for the first time. The NEW 
command erases the entire diskette, it puts timing and block markers on the diskette 
and creates the directory and BAM. The NEW command can also be used to clear out 
the directory of an already- format ted diskette. This is faster than re-formatting the 
whole disk. 

FORMAT FOR THE NEW COMMAND TO FORMAT DISK: 

PRINTS15, "NEW: name, id" 
or abbreviated as 

PRINTS15, "N:name,id" 



FORMAT FOR THE NEW COMMAND TO CLEAR DIRECTORY: 
PRINTS15, "N:name" 

The name goes in the directory as the name of the entire disk. This only appears 
when the directory is listed. The ID code is any 2 characters, and they are placed hot 
only on the directory but on every block throughout the diskette. That way, if you 
carelessly replace diskettes while writing data, the drive will know by checking the ID 
that something is wrong. 
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COPY 

This command allows you to make a copy of any program or file on the disk 
drive. It won't copy from one drive to a different one {except in the case of dual drives 
like the 4040), but it can duplicate a program under another name on the drive. 

FORMAT FOR THE COPY COMMAND: 

PRINTS 15. "COPY:newfile= oldfile" 
or abbreviated as 

PRINTS 15, "C:newfile = oldfile" 

The COPY command can also be used to combine two through four files on the 
disk. 

FORMAT FOR COPY TO COMBINE FILES: 

PRINT# 15, "C:newfile= oldfilel. oldfik-2, oldfilc3, oldfile4" 

EXAMPLES OF COPY COMMAND: 

PRINTS 15, "C:BACKUP= ORIGINAL" 

PRINTS 15, "C:MASTERFILE= NAME, ADDRESS, PHONES" 



RENAME 

This command allows you to change the name of a file once it is in the disk direc- 
tory. This is a fast operation, since only the name in the directory must be changed. 

FORMAT FOR RENAME COMMAND: 

PRINTS 15, "RENAME:newname=oldnamc" 
or abbreviated as 

PRINTS 15, "R:newname = oldname" 

EXAMPLE OF RENAME COMMAND: 

PRINT#15, "R:MYRA= MYRON" 

The RENAME command will not work on any files that are currently OPEN. 
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SCRATCH 

This command allows you to erase unwanted Tiles and programs from the disk, 
which then makes the blocks available for new information. You can erase programs 
one at a time or in groups by using pattern matching and or wild cards. 

FORMAT FOR SCRATCH COMMAND 

PRINTS 15, "SCRATCH: name" 
or abbreviated as 

PRINTS 15, "S:name" 

If you check the error channel after a scratch operation (see below), the number 
usually reserved for the track number now tells you how many Tiles were scratched. For 
example, if your directory contains the programs KNOW and GNAW, and you use the 
command PRINTS 15, "S:?N?W", you will scratch both programs. If the directory- 
contains TEST, TRAIN, TRUCK, and TAIL, and you command the disk to PRINTS 
15, "S:T*", you will erase all four of these programs. 

INITIALIZE 

At times, an error condition on the disk will prevent you from performing some 
operation you want to do. The INITIALIZE command returns the disk drive to the 
same state as when pow ered up. You must be careful to re-maich the drive to the com- 
puter (see chapter 2). 

FORMAT FOR INITIALIZE COMMAND: 

PRINTS 15, "INITIALIZE , ■ 
or abbreviated as 
PRINTS 15, "I" 



VALIDATE 

After a diskette has been in use for some time, the directory can become 
disorganized. When programs have been repeatedly SAVEd and SCRATCHed, they 
may leave numerous small gaps on the disk, a block here and a few blocks there. These 
blocks never get used because they are too small to be useful. The VALIDATE com- 
mand will go in and re-organize your diskette so that you can get the most from the 
available space. 

Also, there may be data files that were OPENed but never properly CLOSEd. 
This command will collect all blocks taken by such Tiles and make them available to the 
drive, since the files are unusable at that point. 
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There is a danger in using this command. When using random files (see chapter 6), 
blocks allocated will be de-allocated by this command. Therefore, this command 
should never be used with a diskette that uses random files. 

FORMAT FOR VALIDATE COMMAND: 

PRINT#15, "VALIDATE" 
or abbreviated as 

PRINT# 15. "V" 

DUPLICATE 

This command is a hangover from the operating systems that were contained on 
the dual drives like the 4040. It was used to copy entire diskettes from one drive to 
another, but has no function on a single disk drive. 

READING THE ERROR CHANNEL 

Without the DOS Support Program, there is no way to read the disk error channel 
without a program, since you need to use the INPUTS command which won't work 
outside a program. Here is a simple BASIC routine to read the error channel: 

10 OPEN 15, 8, 15 

20 INPUTS 15, AS, BS, CS, DS 

30 PRINT AS, B$, C$, DS 

Whenever you perform an INPUTS operation from the command channel, you 
read up to 4 variables that describe the error condition. The first, third, and fourth 
variables come in as numbers, and can be INPUT into numeric variables if you like. 
The first variable describes the errorSS, where is no error. The second variable is the 
error description. The third variable is the track number on which the error occurred, 
and the fourth and final is the block number inside that track. {A block is also known 
as a sector) 

Errors on track 1 8 have to do with the BAM and directory. For example, a READ 
ERROR on track 18 block may indicate that the disk was never formatted. 
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CLOSE 

It is extremely important that you properly CLOSE files once you are finished 
using them. Closing the file causes the DOS to properly allocate blocks in the BAM 
and to finish the entry in the directory. If you don't CLOSE the file, all your data will 
be lost! 

FORMAT FOR CLOSE STATEMENT: 
CLOSE file# 

You should also be careful not to CLOSE ihe error channel (channels 1 5) before 
CLOSEing your data channels. The error channel should be OPENed first and 
CLOSEd last of all your files! That will keep your programs out of trouble. 

If you close the error channel while other files are OPEN, the disk drive will 
CLOSE them for you, but BASIC will still think they are open (unless you CLOSE 
them properly), and let you to try to write to them. 



NOTE: If your BASIC program leads you into an error condition, all files are 
CLOSEd in BASIC, wilhout CLOSEing them on your disk drive! This is a very 
dangerous condition. You should immediately type the statement OPEN 15, 8, 15, 
"I". This will re-initialize your drive and make all your files safe. 
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5. SEQUENTIAL FILES 

OPEN 

SEQuential files are limited by their sequential nature, which means they must be 
read from beginning to end. Data is transferred byte by byte, through a buffer, onto 
the magnetic media. To the disk drive all Tiles are created equal. That is, SEQuential 
files, program files, and user files all work the same on the disk. Only program files can 
be LOADed, but that's really the only difference. Even the directory works like this, 
except that it is read-only. The only difference is with relative files. 

FORMAT FOR OPENING A SEQUENTIAL FILE: 

OPEN file*, devices, channels, "O:name,type,direction" 

The file number is the same as in all your other applications of the OPEN state- 
ment, and it is used throughout the program to refer to this particular file. The devices 
is usually 8. The channels is a data channel, number 2 through 14. It is convenient to 
use the same number for both the channels and fileS, to keep th.m straight. The name 
is the file name (no wild cards or pattern matching if you're creating a write file). The 
type can be any of the ones from the chart below, at least the first letter of each type. 
The direction must be READ or WRITE, or at least the first letter of each. 

FILE TYPE MEANING 

PRG Program 

SEQ Sequential 

USR User 

REL Relative 

EXAMPLES OF OPENING SEQUENTIAL FILES: 

OPEN 2, 8, 2, "0:DATA, S. W" 

OPEN 8, 8. 8, "0:Program, P, R" 

OPEN A, B, C, "0:" + AS + "U, W" 

If the file already exists, you can use the replace option in the OPEN statement, 
similar to the SAVE-and- replace described in chapter 3. Simply add the @0: before the 
file's name in the OPEN statement. 

EXAMPLE OF SEQUENTIAL FILE WITH REPLACE OPTION: 

OPEN 2, 8, 2. "@0:DATA,S,W" 

The 0: should always precede the name of the file or the drive will only allow you 
to use 2 of the available buffers. 
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PR1NT# and INPUT# 



The PRINTS command works exactly like the PRINT statement, except that out- 
put is re-directed to the disk drive. The reason for the special emphasis on the word ex- 
actly is that all the formatting capabilities of the PRINT statement, as applies to punc- 
tuation and data types, applies here too. It just means that you have to be careful when 
putting data into your files. 

FORMAT FOR WRITING TO FILE WITH PRINTS: 

PRINTS file*, data list 

The file# is the one from the OPEN statement when the file was created. 

The data list is the same as the regular PRINT statement — a list of variables 
and/or text inside quote marks. However, you must be especially careful when writing 
data so that it is as easy as possible to read the data back again. 

When using the PRINTS statement, if you use commas (,) to separate items on the 
line, the items will be separated by some blank spaces, as if it were being formatted for 
the screen. Semicolons {;) don't result in any extra spaces. 

In order to more fully understand what's happening, here is a diagram of a se- 
quential file created by the statement OPEN 5, 8, 5, "0:TEST,S,W": 



char 



tor 



1 o 



12 



13 I 14 



15 



The eof stands for the end-of-file marker. String data entering the file goes in byte 
by byte, including spaces. 

For instance, let's set up some variables with the statement AS= "HELLO"; 
BS= "ALL": C$= "BYE". Here is a picture of a file after the statement PRINTS 5, 
A$; BS; O: 



char 



IQ 



[I 



CR 



12 



eof 



1.3 



CR stands for the CHRS code of 13, the carriage return, which is PRINTed at the 
end of every PRINT or PRINTS statement unless there is a comma or semicolon at the 
end of the line. 



NOTE: Do not leave a space between PRINT and S, and do not try to abbreviate the 
command as ?#. See the appendixes in the user manual for the correct abbreviation. 



FORMAT FOR INPUTS STATEMENT: 
INPUTS fileS, variable list 
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When using the INPUT*/ to read in data, the disk drive can't tell that it's not 
supposed to be one long string. You need something in the file to act as a separator. 
Characters to use as separators include the CR, a comma or a semicolon. The CR can 
be added easily by just using one variable per line on the PRINTS statement, and the 
system puts one there automatically. The statement PRINTS 5, AS: PRINTS 5, BS: 
PRINTS 5, CS puts a CR after every variable being written, providing the proper 
separation for a statement like INPUTS5, AS, B$, CS. Or else a line like 
Z$= ",":PRINTS 5, AS Z$ BS Z$ a will do the job as well, and in less space. The file 
after that line looks iike this: 





H 


E 


L 


L 





, 


A 


L 


I 


, 


B 


V 


1 


CR 


cat 


that 


1 


T 


3 


4 


5 


6 


7 


8 


<) 


10 


11 


12 


l.i 


14 


15 



Putting commas between variables results in lots of extra space on the disk being 
used. A statement like PRINTS 5, AS, BS makes a file that looks like: 





H 


t 


L 


L 









[ 




A 


L 


L 


I ' K 


cot 


thai 


1 


2 


: 


4 


S 


6 


7 8 


" 10 


II 


12 


13 


H 


... [ 23 


24 



You can see that much of the space in the file is wasted. 

The moral of ail this is: take care when using PRINTS so your data will be in order 
for reading back in. 

Numeric data written in the file takes the form of a string, as If the STRS function 
had been performed on it before writing it out. The first character will be a blank space 
if the number is positive, and a minus sign ( - ) if the number is negative. Then comes 
the number, and the last character is the cursor right character. This formal provides 
enough information for the INPUTS statement to read them in as separate numbers if 
several are written with no other special separators. It is somewhat wasteful of space, 
since there can be two unused characters if the numbers arc positive. 



Here is a picture of the file after the statement PRINTS 5, 1; 3; 5; 7 is performed: 

I — > 3 — » I S | — » 7 — » CR cut" 



l 1) a r 



10 i! 



:: 



I i 



i I 



Appendix B contains a program demonstrating the use of a sequential disk file. 



2.1 



GET# 

The GET# retrieves data from the disk, one character at a time. 
FORMAT FOR THE GET# STATEMENT: 
GETS fileS, variable list 

Data comes in byte by byte, including the CR, comma, and other separating 
characters. It is much safer to use string variables when using the GET# statement. You 
will get a BASIC error message if string data is received where a number was requested, 
but not vice-versa. 

EXAMPLES OF GETS STATEMENT: 



GET# 5, AS 

GETS A, BS, C$, D$ 

GETS5, A 

The GET# statement is extremely useful when examining files with unknown con- 
tents like a file that may have been damaged by an experimental program. It is safer 
than 'INPUTS because there is a limit to the number of characters allowed between 
separators of INPUT variables.' With GETS, you receive every character, and you can 
examine separators as well as other data. 

Here is a sample program that will allow you to examine any file on the disk: 



10 INPUT "FILE NAME";F$ 

20 INPUT "FILE TYPE" ;TS 

30 TS = LEFTS (TS,1) 

40 IFTS<>"S" THEN 1FTS<>"P" THEN 1FT$<>"U" THEN20 

45 OPEN15,8,i5 

50 OPEN5,8,5,"0:" + FS + •*." + T$ + ",R" 

60 GOSUB200 

70 GETS5.AS 

80 IFST=0THEN90 

R5 1FST = 64THEN t'[.OSE5,15:END ^-IlNCASEA 

[NULL CHARACTER 
[S READ 



87 PRINT ST: STOP 

90 PRINT ASC(AS + CHRS(O) ); 

100 GOTO70 

200 INPUTS 15, AS, BS.CS.DS 

210 1FVAL(AS)>0THEN PRlNTAS,BS,CS,DS:STOP 

220 RETURN 
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READING THE DIRECTORY 

The directory of the diskette may be read just like a sequential file. Just use S for 
the file name, and OPEN 5, 8, 5, "$". Now the GET# statement works to examine the 
directory. The format here is identical to the formal of a program file: the file sizes are 
the line numbers, and names are stored as characters within quote marks. 

Here's a program that lets you read the directory of the diskette: 



10 
20 
JO 

4(1 

SO 

60 

70 

SO 

85 

90 

100 

110 

120 

130 

140 

160 

if. I 

165 

170 

180 

190 

200 

210 




SKIP OVER BAM 



:TS(3) = "USR": 




OPENl,8,2,"S" 

FOR X=]T0I41:GE™,AS:NEXT' < 

T$(0)= "DEL":T$(1) = "SEQ":TS{2) = "PRC 

T$(4)="REL" 

J=17:GOSUB5Q0<— 

N$=BS 

'SET LENGTH OF ID STRING 



J = 2 

GOSUB500 

IS = BS 

GET#1,A$ 

J = 2^ 

GOSUB500 

OS = BS 

FOR L=lTOS8 

GETSl.AS^ 

NEXT 

PRINT CHRS (147) "DISK NAME:"N$,"ID:"I$."OS:"0$ 

PRINT "LENGTH", "TYPE", "NAME" 

FORP=lT08____ — — 

GET#1.Ts!AS.AS 

IFTS=""THENT$ 

J=15* 

GOSUB500 

N$ = BS 
220 GETtfl,AS,A$,A$,A$,A$,AS,AS,AS,A$,C$,H$' 

225 L = ASC(L$ + CHR$(O)) + 256'ASC(HS+CHR$(0)):IF L=0THEN 260 ' 
227 IF ST THEN CLOSEl:END 
230 PRINT L,T5(ASC(T$)- 128),NS 
250 IF P< 8 THEN GETS 1, AS, AS 
260 NEXT P: GOTO 165 
500 B$="" 
510 FOR L=0TOJ 
520 GET#1,AS 

530 IF AS <>CHRS(96) THEN IF AS<>CHR$(160) THEN BS= BS + A 
540 NEXT 
550 RETURN 




STRING 
BUILDING 
ROUTINE 
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Table 5.1: 1540/1541 BAM FORMAT 



Track 18, Sector 0. 



BYTE 



0,1 



4—143 



CONTENTS 



18,01 



65 



DEFINITION 



Track and sector of first directory block. 



ASCII character A indicating 4040 format. 



Null flag for future DOS use. 



Bit map of available blocks for tracks 1-35. 



* 1 = available block 
= block not available 

(each bit represents one block) 



Table 5.2: 1540/1541 DIRECTORY HEADER 



Track 18, Sector 0. 



BYTE 



161 



162—363 



164 



165,166 



166—167 



171—255 



CONTENTS 



160 



50,65 



160 



DEFINITION 



Disk name padded with shifted spaces. 



Disk ID. 



Shifted space. 



ASCII representation for 2A which is DOS version 
and format type. 



Shifted spaces. 



Nulls, not used. 



Note: ASCII characters may appear in locations 180 thru 191 on some diskettes 
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Table 5.3: DIRECTORY FORMAT 



Track 18, Sector 1 for 1540/154] 


BYTE 


DEFINITION 


0,1 


Track and sector of next directory block. 


2—31 


•File entry 1 


34—63 


•File entry 2 


66—95 


•File entry 3 


98—127 


•File entry 4 


130—159 


•File entry 5 


162—191 


•File entry 6 


194—223 


•File entry 7 


226—255 


•File entry 8 



•■STRUCTURE OF SINGLE DIRECTORY ENTRY 



BYTE 


CONTENTS 


DEFINITION 





128 + type 


File type OR'ed with S80 (hexadecimal) to indicate 
properly closed file. 
TYPES: = DELeted 

1 = SEQential 

2 = PROGram 

3 = USER 

4 = RELative 


1,2 




Track and sector of 1st data block. 


3—18 




File name padded with shifted spaces. 


19,20 




Relative file only: track and sector for first side sector 

block. 
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Relative file only: Record size. 


22—25 




Unused. 


26,27 




Track and sector of replacement file when OPEN® is 
in effect. 


28,29 




Number of blocks in file: low byte, high byte. 
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Table 5,4: SEQUENTIAL FORMAT 



BYTE 



0,1 



2—256 



DEFINITION 



Track and sector of next sequential data block. 



254 bytes oF data with carriage returns as record terminators. 



Table 5.5: PROGRAM FILE FORMAT 



BYTE 



0.1 



DEFINITION 



Track and sector of next block in program file. 



2—256 



254 bytes of program info stored in CBM memory formal (with key 
words tokenized). End of Tile is marked by three zero bytes. 
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6. RANDOM FILES 

Sequential files are fine when you're just working with a continuous stream of 
data, but some jobs require more than that. For example, with a large mailing list, you 
would not want to have to scan through the entire list to find a person's record. For 
this you need some kind of random access method, some way to get to any record in- 
side a file without having to read through the entire file first. 

There are actually two different types of random access files on the Commodore 
disk drive. The relative files discussed in the next chapter are more convenient for data 
handling operations, although the random files in this chapter have uses of their own, 
especially when working with machine language. 

Random files on the Commodore disk drive reach the individual 256-byte blocks 
of data stored on the disk. As was mentioned in the first chapter, there are a total of 
683 blocks on the diskette, of which 664 are free on a blank diskette. 

The diskette is divided into tracks, which are laid out as concentric circles on the 
surface of the diskette. There are 35 different tracks, starting with track 1 at the outside 
of the diskette to track 35 at the center. Track 1 8 is used for the directory, and the DOS 
fills up the diskette from the center outward. 

Each track is subdivided into blocks. Because there is more room on the outer 
tracks, there are more blocks there. The outer tracks contain 21 blocks each, while the 
inner ones only have 17 blocks each. The table below shows the number of blocks per 
track. 

Table 6.1: Track and Block Format 



TRACK NUMBER 


BLOCK RANGE 


TOTAL BLOCK 


1 to 37 
18 to 24 
25 to 30 
31 to 35 


to 20 
Oto 18 

to 17 
Oto 16 


21 
19 
18 
17 



The DOS contains commands for reading and writing directly to any track and 
block on the diskette. There are also commands for checking to see which blocks are 
available, and for marking off used blocks. 

These commands are transmitted through the command channel (channel* 15), 
and tell the disk what to do with the data. The data must be read later through one of 
the open data channels. 
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OPENING A DATA CHANNEL FOR RANDOM ACCESS 



When working with random access files, you need to have 2 channels open to the 
disk: one for the commands, and the other for the data. The command channel is 
OPENed to channel 15, just like other disk commands you've encountered so far. The 
data channel for random access files is OPENed by selecting the pound sign (#) as the 
file name. 

FORMAT FOR OPEN STATEMENT FOR RANDOM ACCESS DATA: 

OPEN file#, device#, channels, "#" 
or optionally 

OPEN File#, device#, channel*, "#buffer#" 

EXAMPLES OF OPENING RANDOM ACCESS DATA CHANNEL: 

~~tDON'T CARE WHICH BUFFER 

'PICK BUFFER #2 

i? — ■ — > 

BLOCK-READ 



OPEN A, B, C, "#2" 



FORMAT FOR BLOCK-READ COMMAND: 

PRINTtffileS, "BLOCK-READ:" channel; drive; track; block 
or abbreviated as 

PRINTSfilefl, "B-R:" channel; drive; track; block 

This command will move one block of data from the diskette into the selected 
channel. Once this operation has been performed, the INPUTS and GETS statements 
can read the information. 

SAMPLE PROGRAM TO READ BLOCK 2 FROM TRACK 18: (stores contents in 

BS) ^ •_ 

(DRIVE J 
CHANNEL 



( TRACK) 
15.8,15 \ >-C^ 

5,8,5,"#" \ J- i/js^~~~~~ 



10 OPEN15.8.15 

20 OPEN5,8,5,"#" \ J- j/ -v""" 
30 PRINT#15,"B-R:"5;0;18;; 
40 B$ = "" 
50 FOR L = 0TO255 
60 GETS5.AS 

70 IF ST=0 THENBS = BS + AS:NEXTL 
80 PRINT "FINISHED" 

90 CLOSE5:CLOSE15 \cOLLECT ENTIRE 

BLOCK: BYTE 
BY BYTE 



BLOCK-WRITE 

The BLOCK-WRITE command is the exact opposite of the BLOCK-READ com- 
mand. First you must fill up a data buffer with your information, then you write that 
buffer to the correct location on the disk. 

FORMAT FOR BLOCK- WRITE COMMAND: 

PRINTflfilefl, "BLOCK-WRITE:" channel; drive; track; block 
or abbreviated as 

PRINT#file, "B-W:" channel; drive; track; block 

When the data is being put into the buffer, a pointer in the DOS keeps track of 
how many characters there are. When you perform the BLOCK-WRITE operation, 
that pointer is recorded on the disk. That is the reason for the ST check in line 70 of the 
program above: the ST will become non-zero when you try to read past the end-of-file 
marker within the record. 

SAMPLE PROGRAM TO WRITE DATA ON TRACK I, SECTOR 1: 



10 
20 


0PEN15,8,I5 
OPEN5.8,5."#"<— — -*""""""" 


OPEN A RANDOM 
1 ACCESS CHANNEL 


30 


FOR L=lTO50 




40 


PRINT#5."TEST" 




50 


NEXT 




60 


PRINT#15,"B-W:"5;0;1;1 




70 


CLOSE5:CLOSE15 





BLOCK-ALLOCATE 

In order to safely use random files along with regular files, your programs must 
check the BAM to find available blocks, and change the BAM to reflect that you've 
used them. Once you update the BAM, your random files will be safe — at least unless 
you perform the VALIDATE command (see chapter 3). 

FORMAT FOR THE BLOCK-AL LOCATE COMMAND: 

PRINT#file#, "BLOCK-ALLOCATE:" drive; track; block 
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How do you know which blocks are available to use? If you try a block that isn't 
available, the DOS will set the error message to number 65, NO BLOCK, and set the 
track and block numbers to the next available track and block number. Therefore, any 
time you attempt to write a block to the disk, you must first try to allocate that block. 
If that block isn't available, read the next block available from the error channel and 
then allocate that block. 

EXAMPLE OF PROCEDURE TO ALLOCATE BLOCK: 

DRIVE 

10 OPEN15,8,15 

20 OPEN5,8,5,"/r 

30 PRINT #5, "DATA" 

40 T=1:B=1 

50 PRINT#15,"B-A:"0;T;B 

60 INPUT#15,A,BS,C,D 

70 IF A = 65 THENT = C:B = D:GOTO50 

80 PRINT #15, "B-W:"5;0;l;l 

90 CLOSES :CLOSEl 5 

BLOCK-FREE 

The BLOCK-FREE command is the opposite of BLOCK-ALLOCATE, in that it 
frees a block that you don't want to use anymore for use by the system. It is vaguely 
similar to the SCRATCH command for files, since it doesn't really erase any data from 
the disk — just frees the entry, in this case just in the BAM. 

FORMAT FOR BLOCK-FREE COMMAND: 

PRlNT#file#, "BLOCK-FREE:" drive; track; block 
or abbreviated as 

PRINTS file*, "B-F:" drive; track; block 



USING RANDOM FILES 

The only problem with what you've learned about random files so far is that you 
have no way of keeping track of which blocks on the disk you used. After all, you can't 
tell one used block on the BAM from another. You can't tell whether it contains your 
random file, just part of a program, or even sequential or relative files. 

To keep track, the most common method is to build up a sequential file to go with 
each random file. Use this file to keep just a list of record, track, and block locations. 
This means that there are 3 channels open to the disk for each random file: one for the 
command channel, one for the random data, and the other for the sequential data. 
This also means that there are 2 buffers that you're filling up at the same time! 
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SAMPLE PROGRAM WRITING 10 RANDOM-ACCESS BLOCKS WITH SE- 
QUENTIAL FILE: 



10 OPEN15.8.15 

20 OPEN5,8,5,"#" 

30 OPEN4,8,4,"@0:KEYS,S,W" 

40 AS = " RECORD CONTENTS #" 

50 FORR=lTOI0 

70 PRINT#5,A$","R 

90 T=1:B=1- 

100 PRINTS15,"B-A:"0;T; 

110 INPUT#15,A,B$,C,D' 

120 IF A = 65THENT = C:B = D:GOTO100 

130 PRINT#15,"B-W:"5;0;T;B 

140 PRINT H4,T","B 

150 NEXT R 

160 CLOSE4:CLOSE5:CLOSEI5 




SAMPLE PROGRAM READING BACK 10 RANDOM-ACCESS BLOCKS WITH 
SEQUENTIAL FILE: 



10 OPEN15,8,15 

20 OPEN5,8,5,"#" 

30 OPEN4,8,4,"KEYS,S,R" 

40 FOR R=lTO10 

50 1NPUT#4,T,B 

60 PRINT#15,"B-R:"5;Q;T;B 

80 INPUT#5,AS,X 

90 IF A$<>"RECORD CONTENTS #'*OR XORTHEN STOP 

100 PRINTA5;R 

110 PR1NT#I5,"B-F:"0;T;JB 

120 NEXT R 

130 CLOSE4: CLOSES 

140 PRINTS, "SO: KEYS" 

150 CLOSE15 




FREES THIS 

TRACK & BLOCK 

FOR LATER USE 
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BUFFER-POINTER 

The buffer pointer keeps track of where the last piece of data was written. It also 
is the pointer for where the next piece of data is to be read. By changing the buffer 
pointer's location within the buffer, you can get random access to the individual bytes 
within a block. This way, you can subdivide each block into records. 

For example, let's take a hypothetical mailing list. The information such as name, 
address, etc., will take up a total of 64 characters maximum. We could divide each 
block of the random access file into 4 separate records, and by knowing the track, sec- 
tor, and record numbers, we can access that individual record. 

FORMAT FOR BUFFER-POINTER COMMAND: 

PRINT#file#, "BUFFER-POINTER:" channel; location 
or abbreviated as 

PRlNWilefl, "B-P:" channel; location 

EXAMPLE OF SETTING POINTER TO 64TH CHARACTER OF BUFFER: 

PRINTS 15, "B-P:" 5; 64 

Here are versions of the random access writing and reading programs shown 
above, modified to work with records within blocks: 

SAMPLE PROGRAM WRITING 10 RANDOM-ACCESS BLOCKS WITH 4 
RECORDS EACH: 

10 OPEN15,8,15 

20 OPEN5,8,5,"#" 

30 OPEN4,8 ( 4,"@0:KEYS,S,W" 

40 AS = " RECORD CONTENTS # 

50 FORR=lTO10 

60 FORL=lT04 

70 PRINT#15,"B-P:"5;(L-1)*64+1 

80 PRENT05,A$ ","L 

90 NEXT L 

100 T=1:B=1 

110 PR[NT#15,"B-A:"0;T;B* : 

120 INPUT#15,A,B$,C,D* 

130 IF A = 65THEN T=C:B=D:GOTOHi 

140 PRINTS! 5,"B-W:"5;0;T;B 

150 PRINT#4,T","B 

160 NEXTR 

170 CLOSE4:CLOSE5:CLOSE15 
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SAMPLE PROGRAM READING BACK 10 RANDOM- ACCESS BLOCKS WITH 
4 RECORDS EACH: 

10 OPEN15,8,15 

20 OPEN5,8,5,"#" 

30 OPEN4,8,4,"KEYS,S,R" 

40 FORR=lTO10 

50 INPUT#4,T,B 

60 PRINT#15,"B-R:"5;0;T;B 

70 FORL=lTO4 

80 PRINT#15,"B-P:"5;(L-1)*64+1 

85 INPUT#5,AS,X 

90 IF A$< >" RECORD CONTENTS fORXOL THEN STOP 

95 PRINT R;A$;L 

100 NEXT L 

110 PR1NT#I5,"B-F:"0;T;B 

120 NEXT R 

130 CLOSE4:CLOSE5 

140 PRINTS! 5,"S0:KEYS" 

150 CLOSE 15 



USER1 and USER2 

The USER commands are generally designed to work with machine language (see 
chapter 8 for more on this). The USER1 and USER2 commands are special versions of 
the BLOCK-READ and BLOCK-WRITE commands, but . . . with an important dif- 
ference: the way USER1 and USER2 work with the buffer-pointer. 

The BLOCK-READ command reads up to 256 characters, but stops reading when 
the buffer-pointer stored with the block says that block is finished. The USER1 com- 
mand performs the BLOCK-READ operation, but first forces the pointer to 255 in 
order to read the entire block of data from the disk. 

FORMAT FOR USER1 COMMAND 

PRINT#fue#, "Ul:" channel; drive; track; block 
or 

PRINT#file#, "UA:" channel; drive; track; block 

There is no difference between the Ul and UA designations for this command. 
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The BLOCK-WRITE command writes the contents of the buffer to the block on 
the disk along with the value of the buffer-pointer. The USER2 command writes the 
buffer without disturbing the buffer-pointer value already stored on that block of the 
diskette. This is useful when a block is to be read in with BLOCK-READ, updated 
through the BUFFER-POINTER and PRINTfl statements, and then written back to 
the diskette with USER2. 

FORMAT FOR USER2 COMMAND: 

PRINT#file#, "U2:" channel; drive; track; block 
or 

PRlNT#fi]e#, "UB:" channel; drive; track; block 

For a more complex wimple program, sl'C Appendix C. 
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7. RELATIVE FILES 

RELaiive files allow you to easily zero in on exactly the piece of data that you 
want from the file. It is more convenient for data handling because it allows you to 
structure your files into records, and into fields within those records. 

The DOS keeps track of the tracks and blocks used, and even allows records to 
overlap from one block to the next, ft is able to do this because it establishes side sec- 
tors, a series of pointers for the beginning of each record. Each side sector can point to 
up to 120 records, and there may be 6 side sectors in a file. There can be up to 720 
records in a file, and each record can be up to 254 characters, so the file could be as 
large as the entire diskette. 



CREATING A RELATIVE FILE 

When a RELative file is first to be used, the OPEN statement will create that file; 
after that, that same file wilt be used. The replace option (with the @ sign) does not 
erase and re-create the file. The file can be expanded, read, and written into. 

FORMAT FOR THE OPEN STATEMENT TO CREATE RELATIVE FILE: 

OPEN file*, device*, channel, "namc.L," + CHR$( record length) 
EXAMPLES OF OPEN STATEMENT CREATING RELATIVE FILES: 

OPEN 2, 8, 2, "FILE,L,"+ CHRS(IOO) 

OPEN F, 8, F, A$+",L," + CHR$(Q) *■ 

OPEN A, B, C, "TEST.L," +CHR$<33) 
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Table 7.1: RELATIVE FILE FORMAT 



DATA BLOCK 



BYTE 



0,1 



2—256 



DEFINITION 



Track and block of next data block. 



254 bytes of data. Empty records contain FF (all binary ones) in the 
first byte followed by 00 (binary all zeros) to the end of the record. 
Partially filled records are padded with nulls (00). 



SIDE SECTOR BLOCK 



BYTE 



0,1 



4,5 



6,7 



8,9 



10,11 



12,13 



14,15 



16-256 



DEFINITION 



Track and block of next side sector block. 



Side sector number. (0-5) 



Record length. 



Track and biock of first side sector (number 0) 



Track and block of second side sector (number 1) 



Track and block of third side sector (number 2) 



Track and block of fourth side sector (number 3) 



Track and block of fifth side sector (number 4) 



Track and block of sixth side sector (number 5) 



Track and block pointers to 120 data blocks. 



Upon execution, the DOS first checks to see if the file exists. If it does, then 
nothing happens. The only way to erase an old relative file is by using the SCRATCH 
command (see chapter 4), but nol by using the replace option. 
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USING RELATIVE FILES 

In order to OPEN a relative file once it exists, the format is simpler. 

FORMAT FOR OPENING AN EXISTING RELATIVE FILE: 

OPEN files, device^, channels, "name" 

In this case, the DOS automatically knows that it is a relative file. This syntax, and 
the one shown in the above section, both allow either reading or writing to the file. 

In order to read or write, you must, before any operation, position the file pointer 
to the correct record position. 

FORMAT FOR POSITION COMMAND: 

PRINTSfileS, "P" CHRS<channel#+96) CHR$(rec#lo) CHR$(rec#hi) 
CHRS( position) 

EXAMPLES OF POSITION COMMAND^. {Orange!? 

fc-^~7T ^— ^—- ~^_ i^=C 
PRINTS15, "P" CHR$(2+96VCHRS(1) CHRSJO)__^^eccTd# 

PRINTSI5, "P" CHR$(CH + 96))CHR$<R1) CHRS(R2) 




^ — ~& Position 
PRINTS15, "P" CHR${4+ 96) CHRS(Rl) CHRS<R2) CHR$(P) (within Record ' 

The 2-byte format for the record number is needed because one byte can only hold 
256 different numbers, and we can have over 700 records in the file. The rccS lo con- 
tains the least significant part of the address, and the rec# hi is the most significant 
part. This could be translated to the actual record number by the formula 
REC# = REC HI • 256 + REC LO. 

If the record number is known, the high and low bytes can be determined as 
follows: 

RECS HI = INT{RECS/256) 
REGS LO = REC#-REC# HI*256 

EXAMPLE: 

PRINTS15, "P" CHR$(4 + 96) CHRS(Rl) CHR$(R2) CHRS{0) 

If REC# = 540: R2 = INT(540/256) . . . so R2 = 2 
Rl = 540-R2 ,, 256 . . . so Rl=28 
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Let's assume we have a mailing list. The list consists of 8 pieces of data, according 
to this chart; 



Field Name 


Lei 


first name 


12 


last name 


15 


address line 1 


20 


address line 2 


20 


city 


12 


state 


2 


zip code 


9 


phone number 


10 



TOTAL 100 



This is how the record length is determined. We would probably want to allow an 
extra character in length for each field, to allow for separations; otherwise the INPUTS 
command would pick up a much longer piece of the file than needed, just like in se- 
quential Tiles. Therefore, we'll set up a file with a length of 108 characters per record. 
In the first record, we'll put the number 1, representing the largest record* used so far. 
Here is the program as described so far: 

5 X = 

10 OPENl.8,15 

20 OPEN2,8,3,"0:MA1L1NG LIST.L, " + CHR5O08) 

30 GOSUB900 

40 PR1NT#1,"P"CHRS{3 + 96)CHR$U)CHRS(0)CHR$(1) 

50 GOSUB900 

60 1 F E = 50 THEN PRI NT#2, 1 :GOTO40 

70 INPUT*r2,X 

75 PRINT X Terror subroutime~ 

300 STOP:CLOSEl;CLOSE2;END_ 

900 1NPUT#1,E.B$,C,D' 

910 IF (E = 50) OR (E<20) THEN RETURN 

920 PRINT EjB$;C;D:STOP:RETURN 

Error #50 which is checked in line 60 of the program is the RECORD NOT PRE- 
SENT error, which means that the record hadn't been created yet. Writing into the 
record will solve the problem. This error condition must be watched carefully within 
your programs. 
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So far, all it does is create the file and the first record, but doesn't actually put any 
data in it. Below is a greatly expanded version of the program, to actually allow you to 
work with a mailing list where the records arc coded by numbers. 

'OPEN 

RELATIVE 

FILE CALLED 

'"MAILING LIST' 

5 A(l) = ]2:A(2)=15:A(3) = 20:A(4) = 2O:A(5)=12:A(6) = 2:A(7) = 9:A<8)=10 
10 OPEN],8,15:OPEN2,8,3,"0:MAILINGLIST,L," + CHR$(108):GOSUB900 J ' 
20 PRINT#1,"P"CHR$(3 + 96)CHR$(1)CHR$(0)CHR$(I):INPUT*2,X$: 

X = VAL(XS): X = THEN X = 2 
30 INPUT "READ,WRITE,OR END"; JS:IF JS = "E"THEN CLOSE2' 

CLOSE I: END 
40 IF J$ = "W" THEN 200 

50 PR1NT:INPUT "RECORD #";R:IF R<0 OR R>X THEN 50* 
60 IFR<2THEN30 

70 R1 = R:R2 = 0:JFR1>256THEN R2= INT (R1/256):R1 =RI -256*R2 
80 RESTORE:DATAi, FIRST NAME, 14.LAST NAME,30,ADDRESS1 51 

ADDRESS2 
90 DATA72,CITY,85,STATE,88,ZIP,98,PHONE# 
100 FOR L=1TO8:READ A,AS:PRINT#l,"P"CHR$(3 + 96) (R1)CHRS(R2) 

HRS(A):GOSUB900 / ~^~V 

1 10 ON A/50 GOTO50 ( WR1TE routIN? 

115 INPUT02,ZS: PRINT AS,Z$:NEXT:GOTO50 
200 PRINT:INPUT "RECORD #";R:IF R<0 OR R>500 THEN 200' 
210 IF R< 2 THEN 30 

215 IF R>K THEN R = X+ I:PRINT:PRINT "RECORD#";R 
220 R1 = R:R2 = 0:IFR>255THEN R2= INT (R1/256):RI = R1-256*R2 
230 RESTORE:FOR L= !T0S:READ A,AS:PRINT/n,"P"CHR${3 + 96) 

CHR${ R 1)CH RS(R2)CH R5( A) 
232 GOSUB900 

235 PRINT AS;: INPUT Z$:IF LEN(Z$)>A(L) THEN Z$ = LEFT$(Z$,A(L)) 
240 PRINT#2,Z$:GOSUB900:NEXT:IF R>X THEN X = R 
245 PRINT#1,"P"CHR$(3 + 96)CHR$0)CHR$(0)CHRS(1) 
250 PRINT#2,X:GOSUB900:GOTO200 
900 INPUT#1,A,BS,C,D:IF A< 20 THEN RETURN "«• 
910 IF AO50 THEN PRINT A ;B$,C;D: STOP: RETURN 
920 IF J$="R" THEN PRINT B5 
930 RETURN 

This program asks for record numbers when retrieving records. It won't let you 
retrieve from beyond the end of the file, and if you try to write beyond the end it forces 
you to write on the next higher record. 

A more advanced version than this would keep track of the items by "keys", to 
index the records. For example, you would probably want to search for a record by 
name, or print out labels by zip code. For this you would need a separate list of keys 
and record numbers, probably stored in sequential files. 
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When working with a new relative file that will soon be very large, it will save 
much time to create a record at the projected end of the Tile. In other words, if you ex- 
pect the file to be 1000 records long, create a record# 1000 as soon as the file is created. 
This will force the DOS to create all intermediate records, making later use of those 
records much faster, 

EXAMPLE OF CREATING LARGE FILE: 

OPEN 1, 8, 15: OPEN 2, 8, 2, "0:REL,L," + CHRS(60) 
PR1NT#1, "P" CHRS(2 + 96) CHR$(0) CHRS(4) CHR$(1) 
PRINTS2, "END" 
CLOSE 2: CLOSE 1 

PROGRAM AND EXPLANATION 

1 REM RELATIVE FILE PROGRAM 

2 DIM AS (5):DIM CS{5) -PRINT" □ " 

3 PRINT "HIT Fl TO CONSTRUCT A RELATIVE FILE" 

4 PRINT "HIT F3 TO READ A RELATIVE FILE" 

5 PRINT "HIT F5 TO READ THE ERROR CHANNEL" :GOSUB 5000 

6 INPUT"ENTER RELATIVE FILE NAME";Z$ 

8 OPEN2,8,2,Z$+ ",L," + CHR$(50) :REM CREATE THE RELATIVE FILE 

9 OPENl.8,15 

1 1 GOSUB 1000 

20 FOR 1 = 1 TO 5 

30 PRINTS, "P"CHRS(2 + 96)CHR$(I)CHRS(0)CHRS(1):REM POSITION THE 

RECORD POINTER 

40 PRINT "ENTER A NAME" 

50 INPUT A$(I) 

60 PRINT#2,A$,<I) 

63 INPUT "ENTER ADDITIONAL INFO";CS(I) 

65 PRINT#1,"P"CHRS(2 + 96)CHRS(I)CHRS{0)CHRS(25) :REM POSITION 

POINTER TO 25TH CHARACTER 

67 PRINT #2,C$(1) 

70 NEXT I 

75 PR INT" DO YOU WISH TO REPLACE A RECORD": INPUT DS 

76 1FD$ = "N"THEN 80 

77 GOSUB 8000 

78 GO TO 75 

80 PRINT"THE RELATIVE FILE IS CONSTRUCTED" 

82 FOR DE = 1 TO 2500: NEXT DE: GOSUB 6000 

85 CLOSE 2 

90 END:STOP 

100 INPUT "ENTER DESIRED FILE TO READ";Z$ 

105 OPEN 2,8,2,ZS:OPEN 1,8,15 

106 PRINT "READING "ZS 
110 FOR 1=1 TO 5 

115 REMFORI = 5T01 STEP-1 

130 PRINT#1,"P"CHRS(2 + 96)CHR$(I)CHRS(0)CHRS(1) 

160 INPUT#2,A$(I) 
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170 PRINT "RECORDS" I") =",AS{1) 

175 K = 6-I 

177 PR1NT#I,"P"CHRS(2 + 96)CHR$(I)CHRS(0)CHRS{25) 

179 1NPUT#2,C$(I):PRINT"ADDIT10NAL INFO:";C$(I) 

180 NEXT I 

181 PRINT "DO YOU WISH TO REPLACE A RECORD": INPUT DS 

182 IF DS="N" THEN 185 

183 GOSUB8000 

184 GO TO 181 

185 GOSUB 1000 

186 J = I+1 

190 PRINT "END OF READ":FOR DE = 1 TO 1500:NEXT DE:GOSUB 
6000:CLOSE2:CLOSE1 :END 

1000 INPUT#1,A,B$.C,D,:1F A < 20 THEN RETURN 

1001 IF A< >50 THEN PRINT A,BS,C,D :STOP:RETURN 

1999 END 

2000 OPEN 15,8,15 

2001 1NPUT#15,A,B$,C,D 

2002 PRINT A,BS,C,D 

2003 CLOSE 15:END 

5000 GET SS:IF SS = ""THEN 5000 :REM SCAN KEYBOARD FOR 
FUNCTION KEY CHRS CODES 

5001 IF SS = CHR$(133) THEN 6:REM ASSIGN Fl FUNCTION KEY 

5002 IF SS = CHR$(134) THEN 100:REM ASSIGN F3 FUNCTION KEY 

5003 IF S$ = CHRS{135) THEN 2000: REM ASSIGN F5 FUNCTION KEY 

5004 RETURN 

6000 PRINT "QHIT F7: FOR HARD COPY OR C TO CONTINUE" 

6001 GET PS: IF P$ < > CHRS(136) AND PS= "C" THEN RETURN 

6002 FOR DE=1 TO 500:NEXT DE:IF P$ = ""OR PS<>CHR$<136) THEN 
6000 

6003 OPEN 4,4 :CMD4 

6004 PRINT#4/'THE "ZS" FILE CONSISTS OF:" 

6005 FOR 1=1 TO 5 

6010 PRINTS, "RECORD # ";I;" = ";A$(I) 

6012 PRINT#4,"ADDITIONAL INFO";I;" = ";CS(I) 

6015 NEXT I 

6020 CLOSE4:RETURN 

7000 REM TO READ IN RECORDS IN REVERSE ORDER REMOVE THE 

REM IN LINE #115 AND 

7002 REM PUT A REM BEFORE LINE#1 10 

7005 REM TO READ THE 1ST FIELD OF THE 1ST RECORD AND THE 2ND 

FIELD OF THE LAST 

7007 REM REPLACE THE CHRS(I) IN LINE 177 WITH CHRS(K) 

8000 PRINT"WHICH RECORD # DO YOU WANT REPLACED":INPUT I 

8001 INPUT"ENTER NEW RECORD" ;A$(I) 

8002 PRINT#i,"P"CHRS(2 + 96)CHRS(l)CHRS(0)CHRS(l):REM POSITION FILE 
POINTER 

8003 PRINT#2,A$(I) 

8004 INPUT'ENTER NEW RECORD (FIELD 2}";C$(I) 
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8005 PRINTS, "P"CHRS(2 + 96)CHR£(I)CHRS(0)CHR$(25) :REM POSITION FILE 

POINTER 
8007 PRINT#2,CS(I) 

8009 PRlNT"RECORD#";l;"HAS BEEN REPLACED" 

8010 RETURN 



CREATE A RELATIVE FILE 

The program below, creates a relative file with 2 fields. The first field starts in 
position I of the record and the second field starts in position 25. 

LINE 8: Create the file. Make room for records of 50 characters with the CHR$(50). 
Use the Z$ as a file, input variable in LINE 6, you can then press the f 1 function key to 
create a file. 

LINE 30: Point to the first character position of a file. P tells the disk drive to point to 
the position in the record that corresponds to the optional, CHR$(1). 

NOTE: If the CHRS is not specified, character position defaults to I. 

LINE 65: Point to the twenty- fifth character position of a file. P tells the disk drive to 
point to the position in the record that corresponds to the CHR$(25). 

NOTE: The POSITION command docs NOT write anything to, or read anything 
from the file. It just points to the position specified in the record. 

WRITE TO A RELATIVE FILE 

LINE 60: Use the PRINTS statement after the POSITION command to move to 
character position I, as specified in LINE 30 — CHR$(1). 

READ FROM A RELATIVE FILE 

LINE 130: Specify the character position using the POSITION command. Then follow 
it with LINE 160, the INPUTS statement. 

SUMMARY 

In this program, you press the fl key and a RELattve file is created on disk. You 
can type RUN and press the 13 key to READ the previous RELative file. If an error 
condition exists (flashing red light on the disk drive) you can hit the RUN/STOP key, 
type RUN and press the f5 key. This reads the ERROR CHANNEL from the drive, 
shows the error number and message, as well as the track and sector of the error. It 
then resets the drive for use. Later on the program asks if the Tile should be printed. To 
print the file, press the 17 key when prompted, or press C to continue. 
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REMEMBER: 

1) Before a file can be written to, or read from, a POSITION command must be ex- 
ecuted, 

2) You must always use PRINT #1 with the POSITION command. This puts your 
daia under command channel control. 

3) The FIRST character string code in the POSITION command must correspond to 
the THIRD number (channel #) in the OPEN statement. Except OPEN 1, 8, 15 
(see tines 8 and 30 of above program). 

4) For convenience, use the FOR . . . NEXT loop variable in the SECOND character 
string, CHRS(I), of the POSITION command where I equals the record number 
(see lines 20 and 30 of above program). 

MODIFYING THE PROGRAM 

1) You can add more POSITION commands to make more fields within each record. 
Remember to include the character position number as the last CHRS, when ad- 
ding fields. 

2) To change the length of each record, change the value of CHR$(50) in LINE 8. 

3) The number of records tn the file is determined by the POSITION command. The 
current example can process 5 records; the FOR . . . NEXT loop variable is I to 5. 
The program can process 720 records, but in order to use more than 512 records, 
the number 2 must be in the THIRD CHRS( ) of the POSITION command. For 
more than 256, use the number 1. For up to 256 records, simply use the FOR . . . 
NEXT loop variable. EXAMPLE: FOR I = I TO 256 may access 256 records. 
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8. PROGRAMMING THE DISK CONTROLLER 

The expert programmer can actually design routines that reside and operate on the 
disk controller. DOS routines can be added that come from the diskette. Routines can 
be added much the same way as the DOS Support Program is "wedged" into your 
memory. 

BLOCK-EXECUTE 

This command will load a block from the diskette containing a machine language 
routine, and begin executing it at location in the buffer until a RTS (ReTurn from 
Subroutine) command is encountered. 

FORMAT FOR BLOCK-EXECUTE: 

PRINT#file#, "B-E:" channel; drive; track; block 

MEMORY-READ 

There is 16K of ROM in the disk drive as well as 2K of RAM. You can get direct 
access to these, or to the buffers that the DOS has set up in the RAM, by using the 
MEMORY commands. MEMORY-READ allows you to select which byte to read, 
through the error channel. 

FORMAT FOR MEMORY-READ: 

PRINTflfile*, "M-R" CHRS(low byte of address) CHR${high byte) 
(no abbreviation!) 

The next byte read using the GET# statement through channel* 15, the error 
channel, will be from that address in the disk controller's memory, and successive bytes 
will be from successive memory locations. 

Any INPUTS to the error channel will give peculiar results when you're using this 
command. This can be cleared up by any other command to the disk (aside from a 
memory command), 

PROGRAM TO READ THE DISK CONTROLLER'S MEMORY: 

10 OPEN15.8.15 

20 1NPUT"L0CAT10N PLEASE";A 

25 FOR L=lTO50 

30 Al = INT(A/256): A2 = A - A1'256 

40 PRINT#15,"M-R"CHRS(A2)CHRS(A1) 

50 GET#I5,A$-* — 



60 PRINT ASC(A$ + CH RS(0)); 
70 A = A+I 
80 NEXT 

90 INPUT "CONTlNUE";AS 

100 IF LEFT$(A$,1) = "Y" THEN 25 

110 GOTO20 
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MEMORY-WRITE 

The MEMORY-WRITE command allows you to write up to 34 bytes at a time in- 
to the disk controller's memory. The MEMORY-EXECUTE and USER commands 
can be used to run this code. 

FORMAT FOR MEMORY-WRITE: 

PRINT#file#, "M-W" CHRS(Iow address byte) CHR5{high address byte) 
CHRS(#-of-charaeters) byte data 

program to write an "rts" to disk: 

Initialize i 




10 OPEN8,8,15,"I"-< 

20 PRINT#8,"M - W"CHRS(0)CHR$(3)CHR$(1)CHRS(96) 

30 PRINT#8."M - E"CHR$(0)CHRS(3) 

40 CLOSES 



MEMORY-EXECUTE 



Any routine in the DOS memory, RAM or ROM, can be executed with the 
MEMORY-EXECUTE command. 

FORMAT FOR MEMORY -EXECUTE: 

PRlNT#fiIe#, "M-E" CHR$(low address byte) CHRS{high byte) 
See line 30 above for an example. 
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USER COMMANDS 

Aside from the USER1 and USER2 commands discussed in chapter 6, and the 
UI + and UI - commands in chapter 2, the USER commands are jumps to a table of 
locations in the disk drive's RAM memory'. 

USER COMMAND FUNCTION 

UI or UA BLOCK-READ without changing buffer-pointer 

U2 or UB BLOCK- WRITE without changing buffer-pointer 

U3 or UC jump to S0500 

U4 or UD jump to $0503 

U5 or UE jump to $0506 

U6 or UF jump to S0509 f (HEXADECIMAL LOCATIONS) 

U7 or UG jump to SO50C 

US or UH jump to S050F 

U9 or UI jump to SFFFA 

U; or UJ power- up vector 

UI + set Commodore 64 speed 

UI- set VIC 20 speed 

By loading these locations with another jump command, like JMP $0520, you can 
create longer routines that operate in the disk's memory along with an easy-to-use 
jump table — even from BASIC! 

EXAMPLES OF USER COMMANDS: 

PRINTS 15, "U3" 

PRINTS 15, "U" + CHRS(50+Q) 

PRINTS 15, "UI" 



47 



9. CHANGING THE DISK DRIVE DEVICE NUMBER 

SOFTWARE METHOD 

The device number is selcaed by the drive by looking at a hardware jumper on [he 
board and writing the number based on [hat jumper in a section of its RAM. Once 
operation is underway, it is easy to write over the previous device number with a new 
one. 

FORMAT FOR CHANGING DEVICE NUMBER: 

PRINT#fiie#, "M-W:" CHRSU19) CHR$(0) CHRS(2) CHR$(address + 32) 
CHR$(address + 64) 

EXAMPLE OF CHANGING DEVICE NUMBER (FROM 8 TO 9): 

10 OPEN 15, 8, 15 

20 PRINTS 15, "M-W" CHRSU19) C HRS(O) CHRS{2) CHR$(9 + 32) 
CHRS(9+64) 

If you have more than one drive, it's sensible to change the address through hard- 
ware (see below). If you must, the procedure is easy. Just plug in the drives one at a 
time, and change their number to the desired new values. That way you won't have any 
conflicts. 
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HARDWARE METHOD 

It's an easy job to permanently change the device number of your drive for use in 
multiple drive systems. The tools needed are a phillips-head screwdriver and a knife. 

STEPS TO CHANGING DEVICE NUMBER ON HARDWARE: 



I. 
2. 
3. 
4. 
5. 
6. 
7. 



9. 
10. 



Disconnect all cables from drive, including power. 

Turn drive upside down on a flat, steady surface. 

Remove 4 screws holding drive box together. 

Carefully turn drive right side up, and remove case top. 

Remove 2 screws on side of metal housing. 

Remove housing. 

Locate device number jumpers. If facing the front of the drive, it's on the 

left edge in the middle of the board. 

Cut either or both of jumpers 1 and 2 for Model 1541. 

Cut either or both of jumpers A and B for Model 1541CR. 

(see chart below) 

Replace housing and 2 screws, and case top and 4 screws. 

Rc-counect cables and power up. 



DEVICE* 


JUMPER A/1 


JUMPER B/2 


8 


DON'T CUT 


DON'T CUT 


9 


CUT 


DON'T CUT 


10 


DON'T CUT 


CUT 


11 


CUT 


CUT 
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10. 



ASSEMBLY LANGUAGE AND THE 1541 



If you want to use your 1541 disk drive to manipulate data directly from assembly 
language you can use the information presented below. 

Here is a list of subroutines that provide the start of memory locations in each of 
the Kernal routines. These routines are used in conjunction with the assembly language 
command JSR to jump to that subroutine location in memory: 

SUBROUTINE 



SETLFS 


= SFFBA 


; set logical, physical & secondary addresses 


SETNAM 


= SFFBD 


; save length & address of filename 


OPEN 


= SFFCO 


; open a logical file 


CLOSE 


= SFFC3 


; close a logical file 


CHKIN 


m SFFC6 


; open a channel for input 


CLRCH 


= SFFCC 


; clear all channels 


BASIN 


= SFFCF 


; get a byte from a file 


BSOUT 


= SFFD2 


; output a character to the screen 



For a more complete description as to what each routine does and what 
parameters are passed to and from each routine, see your Commodore 64 or VIC-20 
Programmer's Reference Guide, 

Now-, for a practical application of the subroutines listed above, here is a sample 
program using those routines to read a sequential file on a disk. Assume that you have 
stored the filename "TEST" at SC000, 



iNrr 

LDA#S04 

LDX #500 

LDV #$C0 

JSR SETNAM 

LDA #$03 

LDX #$08 

LDV #$00 

JSR SETLFS 

JSR OPEN 

LDX #$03 

JSR CHKIN 

your program info 

JSR BASIN 

BEQ END 

JSR BSOUT 

JMP your prog, info 

END 

LDA#$03 

JSR CLOSE 

JSR CLRCH 

RTS 



initialize: 

filename length 

low byte of filename address 

high byte of filename address 

save length & address of filename 

logical address 

device number 

secondary address (0 = read seq. file) 

set logical, physical & secondary addresses 

open logical file 

set x-registcr to logical address 

open input channel 

get data and print it one byte at a time 

get one byte 

if then end of file or error 

output character to the screen 

loop 

set accumulator to logical address 
close file 

clear channels and reset defaults 
end of assembly language program 



SO 



APPENDIX A: DISK COMMAND SUMMARY 

General Format: PRlNT#file#, command 



COMMAND 

NEW 
COPY 

RENAME 

SCRATCH 

INITIALIZE 

VALIDATE 

DUPLICATE 

13 LOCK- READ 

BLOCK-WRITE 

BLOCK-ALLOCATE 

BLOCK-FREE 

BUFFER-POINTER 

USER1 and USER2 

POSITION 

BLOCK-EXECUTE 
MEMORY-READ 

MEMORY-WRITE 

MEMORY-EXECUTE 

USER Commands 



"N 

"C:new file=:orginal file 

"R:new name = old name 

"Sifile name 

"I 

"V 

not for single drives 

"B-R:" channel; drive; track; block 

"B-W:" channel; drive; track; block 

"B-A:" drive; track; block 

"B-F:" drive; track; block 

"B-P:" channel; position 

•■: n:" channel; drive: track; block 

"P" CHRSf channel*) CHRS{rec#lo) CHR5(rec#hi) 

CHRS( position} 

"B-E:" channel; drive; track; block 

"M-R" CHR$(address lo) CHR$(addrcss hi) 

"M-W" CHR${ address lo) CHR$(address hi) 

CHRS(#chars) "data" 

"M-E" CHRS(address lo) CHRS{addr«s hi) 

"L"n" 



5! 



APPENDIX B: SUMMARY OF CBM FLOPPY ERROR MESSAGES 

OK, no error exists. 

1 Files scratched response. Not an error condition. 
2-19 Unused error messages: should be ignored. 

20 Block header not found on disk. 

21 Sync character not found. 

22 Data block not present. 

23 Checksum error in data. 

24 Byte decoding error. 

25 Write-verify error. 

26 Attempt to write with write protect on. 

27 Checksum error in header. 

28 Data extends into next block. 

29 Disk id mismatch. 

30 Genera] syntax error 

31 Invalid command. 

32 Long line. 

33 Invalid filename. 

34 No file given. 

39 Command file not found. 

50 Record not present. 

51 Overflow in record. 

52 File too large. 

60 File open for write. 

61 File not open. 

62 File not found. 

63 File exists. 

64 File type mismatch. 

65 No block. 

66 Illegal track or sector. 

67 Illegal system track or sector. 

70 No channels available. 

71 Directory error. 

72 Disk full or directory full. 

73 Power up message, or write attempt with DOS Mismatch. 

74 Drive not ready. 
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DESCRIPTION OF DOS ERROR MESSAGES 

NOTE: Error message numbers less than 20 should be ignored with the exception or 01 
which gives information about the number of files scratched with the SCRATCH com- 
mand. 

20: READ ERROR (block header not found) 

The disk controUer is unable to locate the header of the requested data block. 
Caused by an illegal block number, or the header has been destroyed. 

21: READ ERROR (no sync character) 

The disk controller is unable to detect a sync mark on the desired track. Caused 
by misalignment of the read/ writer head, no diskette is present, or unformatted 
or improperly sealed diskette. Can also indicate a hardware failure. 

22: READ ERROR (data block not present) 

The disk controller has been requested to read or verify a data block that was 
not properly written. This error message occurs in conjunction with the BLOCK 
commands and indicates an illegal track and/or block request. 

23: READ ERROR (checksum error in data block) 

This error message indicates that there is an error in one or more of the data 
bytes. The data has been read into the DOS memory, but the checksum over the 
data is in error. This message may also indicate grounding problems. 

24: READ ERROR (byte decoding error) 

The data or header as been read into the DOS memory, but a hardware error has 
been created due to an invalid bit pattern in the data byte. This message may also 
indicate grounding problems. 

25: WRITE ERROR (write- verify error) 

This message is generated if the controller detects a mismatch between the writ- 
ten data and the data in the DOS memory. 

26: WRITE PROTECT ON 

This message is generated when the controller has been requested to write a data 
block while the write protect switch is depressed. Typically, this is caused by us- 
ing a diskette with a write a protect tab over the notch. 

27: READ ERROR (checksum error in header) 

The controller has detected an error in the header of the requested data block. 
The block has not been read into the DOS memory. This message may also in- 
dicate grounding problems. 

28: WRITE ERROR (long data block) 

The controller attempts to detect the sync mark of the next header after writing a 
data block. If the sync mark does not appear within a pre-determined time, the 
error message is generated. The error is caused by a bad diskette format (the 
data extends into the next block), or by hardware failure. 
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29: DISK ID MISMATCH 

This message is generated when the controller has been requested to access a 
diskette which has not been initialized. The message can also occur if a diskette 
has a bad header. 

30: SYNTAX ERROR (general syntax) 

The DOS cannot interpret the command sent to the command channel. Typical- 
ly, this is caused by an illegal number of file names, or patterns are illegally used. 
For example, two file names may appear on the left side of the COPY com- 
mand. 

31: SYNTAX ERROR (invalid command) 

The DOS does not recognize the command. The command must start in the first 
position, 

32: SYNTAX ERROR (invalid command) 

The command sent is longer than 58 characters. 

33: SYNTAX ERROR (invalid file name) 

Pattern matching is invalidly used in the OPEN or SAVE command. 

34: SYNTAX ERROR (no file given) 

the file name was left out of a command or the DOS does not recognize it as 
such. Typically, a colon (:) has been left out of the command. 

39; SYNTAX ERROR (invalid command) 

This error may result if the command sent to command channel (secondary ad- 
dress 15) is unrecognized by the DOS. 

50: RECORD NOT PRESENT 

Result of disk reading past the last record through 1NPUT#, or GET# com- 
mands. This message will also occur after positioning to a record beyond end of 
file in a relative file. If the intent is to expand the file by adding the new record 
(with a PRINTS command), the error message may be ignored. INPUT or GET 
should not be attempted after this error is detected without first repositioning. 

51: OVERFLOW IN RECORD 

PRINTS statement exceeds record boundary. Information is cut off. Since the 
carriage return is sent as a record terminator is counted in the record size. This 
message will occur if the total characters in the record (including the final car- 
riage return) exceeds the defined size. 

52: FILE TOO LARGE 

Record position within a relative file indicates that disk overflow will result. 

60: WRITE FILE OPEN 

This message is generated when a write file that has not been closed is being 
opened for reading. 
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61: FILE NOT OPEN 

This message is generated when a file is being accessed that has not been opened 
in the DOS. Sometimes, in this case, a message is not generated; the request is 
simply ignored. 

62: FILE NOT FOUND 

The requested file does not exist on the indicated drive. 

63: FILE EXISTS 

The file name of the file being created already exists on the diskette. 

64: FILE TYPE MISMATCH 

The file type does not match the file type in the directory entry for the requested 

file, 

65: NO BLOCK 

This message occurs in conjunction with the B-A command. It indicates that the 
block to be allocated has been previously allocated. The parameters indicate the 
track and sector available with the next highest number. If the parameters are 
zero (0), then all blocks higher in number arc in use. 

66: ILLEGAL TRACK AND SECTOR 

The DOS has attempted to access a irack or block which does not e>dsi in die 
format being used. This may indicate a problem reading the pointer to the next 
block. 

67: ILLEGAL SYSTEM T OR S 

This special error message indicates an illegal system track or block. 

70: NO CHANNEL (available) 

The requested channel is not available, or all channels are in use. A maximum of 
five sequential files may be opened at one time to the DOS, Direct access chan- 
nels may have six opened files. 

71: DIRECTORY ERROR 

The BAM docs not match the internal count. There is a problem in the BAM 
allocation or the BAM has been overwritten in DOS memory. To correct this 
problem, reinitialize the diskette to restore the BAM in memory. Some active 
files may be terminated by the corrective action. NOTE: BAM = Block 
Availability Map 

72: DISK FULL 

Either the blocks on the diskette are used or the directory is at its entry limit. 
DISK FULL is sent when two blocks are available on the 1541 to allow the cur- 
rent file to be closed. 
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73: DOS MISMATCH (73, CBM DOS V2.6 1541) 

DOS I and 2 are read compatible but not write compatible. Disks may be inter- 
changeably read with either DOS, but a disk formatted on one version cannot be 
written upon with the other version because the format is different. This error is 
displayed whenever an attempt is made to write upon a disk which has been for- 
matted in a non-compatible format. (A utility routine is available to assist in 
converting from one format to another.) This message may also appear after 
power up. 

74: DRIVE NOT READY 

An attempt has been made to access the 1541 Single Drive Floppy Disk without 
any diskettes present in either drive. 
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APPENDIX C: Demonstration Disk Programs 

1. DIR 



4 OFtt.; -: : ■■ 

5 print ~' SOTO 10000 
18 0FEN1 .8.0 ■ "*0" 

20 GET#1 ft! EI 
":0 PET4I1 ftf.Er 
40 OET»I . m* 51 

50 c=e 

•IE 1 IF --I';* ■ THEN ." = -;■: -""I" 

~o :f Ft'. "' THEN C"C+fiSC<B*>*236 

30 print- s-rtiiw<STR»<c> z);T(ffl(3)i*r; 

?B r-ETnl Ft IF STO0 ~^F ; < 1888 
]Q@ IF B*OCHR*C34) THEN 98 

lin CCT»1 B* IF B#OCHR*<34>THEH PPlHTBJ 60T0118 
120 C-ETa; M TF BS*CHRS< J2) THEN 1^0 
138 PRINT TUB' 18 • CI="" 

.-■: li=:i-:i GET*] El IF B«C " THEN '40 
159 PRINT" a"LEFT*CC» 3 
168 SET T* IF T*0"" THEN GOSUS 2000 
178 IF ST-Q THEN 30 
1000 PPINT" BLOCKS FREE' 
1018 CLOSE I GOTO 1P1000 
2888 IF T*="9" THEt- CLOSE 1 END 
3ET TT IF T*="" THEN 2000 
2828 RETURN 
4808 PES1 DISK COMMHND 
4eili? ':*="" PRINT"j 

4011 GETB* IFEI="" THEN48I 1 

4012 FPINTB*. IF B*»CHFJ--;;-:- THEN 4026 
401 ; :*=C**B* GOTO 4011 

4O20 FRINT#2.C* 

T-000 PRINT" S" ■ 

■5010 GET*2.Fi* PRIHTfW: IF RJOCHPf 1 3>OOTO30t0 

5020 PRINT""" 

1OOO0 PRINT "D-BIRECTORV* 

I0O10 PRINT ">-DISK C0f1FiRH[i" 

10020 PRINT "0-QUlT PROGRAM" 

10838 PRINT "S-DISK STATUS " 

1OI0O OETfl* IFR*=""THENI0100 

10200 IF H»«"J)" THEN 10 

10-300 IF ft**"." OR Flf -":-" OR R*»">" THEN 4000 

10310 IF fl*="0" THEN END 

10320 IF R*="S" THEN 5000 

18999 GOTO 10100 
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2. VIEW BAM 



100 RE11 •♦»••***+#****»»*••■*«»•*******• 

131 REM * VIEW BAS1 FOR VIC * 64 DISK # 

102 REM *»»•*«***#*#♦****»*•»»»*♦#»****» 

103 OPEN 15. S- 15 

110 PRINT* 15 . "18" NU*="M/fl N/fl N/fl !I/Fr tVfl" Z4=I 

120 QFEH 2 3- 2 "*" 

150 V*«" WBBnWWMBCCMggBIDBgaBWIBIIWlll' ' 

14(1 I I »lltl»l»l 

130 TEF FNS<Z> = 2T<S-lHT<:S/8>#8) HMD 'SB'' INT'S/9> 3 > 

168 print* 15."U1 ",2;0; IB, a 

170 PRIHTH13. "B-P" ;2;l 

160 PRIMT-T-- 

190 V«22 X=l I3OSUE430 

200 FOR1=0TO20 PPIMT PRINT'-TT'PIGHTf 'STFC I >*" " . 3 i . NEXT 

£10 C*ET«2,R* 

220 OET*2.R* 

230 GETMS.ft* 

240 TS-0 

250 F0PT-1TD17 GOSUB430 

260 V-22 <*T+4 BOSUB438 GOSUB340 NEXT 

270 FOR1-1TO2000 NEXT PRIHT"3" 

280 V«22 ■ X« 1 GOSUB430 

290 F0P1-0T028 PRINT PRINT"TTRIGHT»<STR** I>* *,3)i NEXT 

300 F0RT«18TO33 

"3 in C-OSU5450 

321? V»22 X«T-t3 GOSUB430 GOSUB540 NEXT 

330 FORI-1TO1880 NEXT 

340 PRINT "7I«H*IKW" 

330 PRINT* 15- "B-P";2; 144 

360 Nf="" FORI -1TOS©: GET «2,R* N*=NI+A* NEXT 

370 PRINT H*" "TS-17; "BLOCKS FREE" 

381.1 FOR I * 1 TO40B0 : NEXT 

39p PR I NT" 71" 

4W INPUT" M!MM=IKi:iTHEP DISKETTE lillll" II 

410 [FRf«< V'THENPIJN 

420 IFfWO"VTHEMEMD 

430 PRIMTLEFT#<V#.V>I EFT* r i ■:-: • "IP ■ 

440 RETURN 

430 GET*2 SCt SOfl$C<RIGHT*«CHR$<e>*SC* I ■ 

4^0 fS-TS+SC 

471-1 GET*2R* IFFI»="' , THENFI*-CHRIi i 

430 SB<0>-fiSCCR*5 

4?0 GETtS SI TFR*=""THENR*='">J=T ' B ' 

3-00 SB' 1 >»flSC 'flr I 

310 GET#?.fW IFRI= THEim=>:HP*'Cv 

•520 sb-'i »nsc<«»> 

539 RETURN 

540 PRINT-WPIGHTirSTPI'T-' 1 ■ ■ "im n 

550 REM FFIliTT" "SC SB<0>" "SB< 1 >' SB<2 J-CHR*t0> 

160 IFT:.24fluDS=iSTHEN:pPINTMirJ''HHi.-4. I >. 60TC$68 

370 F0PS*OT02'1 

5<?0 IFT<I8THENe2G 

'•■'jO IFT>38RNDS«1?THEH PRlNTMIWtHUl . T4 , 1); GO 10668 

Fi'Vi IFT: . ?4R(IPS- ISTHENPRINTNIIir-'llilt . ~4, 1 . SOTO660 

.-.]ii iFT 24RNDS»19THEHPRINTriIIl*i:HU*.24» 1 >- G0T0668 

62>1 IFT"' 1 7filipS=20THENPF INTrtlM-'NU* - 24 , 1 '■ ■ 74-74* 1 6OTO660 

630 PRINT"*' . 

P ;40 IF Fn".-- -. -=n THEN PRINT"*' UOTO660 

650 PPIMT 1 ■+ ■ PFMPrr.HTr ;tpt- : . i , -4 - l > GOT07I 

660 PRINT "-IB . 

670 NEXT 

6811 PETUPil 
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3. DISPLAY T&S 



100 REN*** **************** **.*****:**** 
U8 REN* Iif-iPLfl.' RNV TRFIO x SECTOR * 
120 REM* ON THE DISK TO THE SCREEN * 
150 REM* OR THE PRINTEF * 

I41T FF- ♦**•*♦**+*+»+** »••*♦•-*»»♦♦♦♦* 

l-.ii PFlr<""rjN»L . . . _" 

1F.0 FPIHT- DH-PLft'. ILlnH rptiTEUT] " 

1S3 FRIHT"' " " ~ — 

170 *En** ******** ******************** 
IPO REM* SET PROGRAM CONSTANT + 

1 iii REM«««##**#*#*****##«#«********** 
20@ SP.fs' 1 " NL*"fHR*<0) HH*"*01234S6789RSCDEF" 

■"■ FS*» " FORI =64 10 ?5 FS««F*.*+"a"+iTHP* •' I >*"W NEXT I 
;;..-- ;-.*=■■ " FOP 1 = 1 ?£■ TO 223 SSJ-SS* +"a"*CHPf < I > + "■" :NEXT I 
249 DIM ft' IT- ME' 2 
231 D*="0" 

253 PRINT" aSBCFEENHMlMilinP WIMPS 1 INTEP" 

=:_ GETJJi IF Iir="" THE! 12^4 

235 IF rJ«""S"THENPRINT" OaSCRBEHB" 

236 IF I,T*»*'P"THENPRtNT* NBFR INTERS" 
260 OPEN] 3- 8M 3-" I"+D* - GO SUB 650 

265 QPEN4.4 

270 OPEN 2 • 6 • 2 . " » " QOSUS 650 

230 PEN********************** ******** 

290 PEM* LORD TRACK F»JP SECTOR * 

300 FEU* INTO BIS! BUFFER * 

310 REN****************************** 

320 IMPUT"»MTRRCK. SECTOR". T,S 

330 if T=0 OP T>35 THEN PPINTHlSi'T'D* CL0SE2 CL0SE4 : CLOSE 13 PRIHT"EMD" : END 

340 IF JJ*»"S" THEN PRINT "IWrTRFlCr'T" SECTOR" S" IT 

341 IF IJ*-"P" THEN PF'INT#4 PPTNTH4 . "TRACK" T" SECTOR"S : PR1HTM 
550 PPINTttr.',. "01 2."D* T.S I30-SIJBS50 

368 PZtl***************** ************* 
770 =ei-. = f~P f'.'TE 0" d:si j buffer » 
330 pen*«******** **»**♦*»♦♦♦ ********* 

400 PPItlT»13,"E-P-2. 1" 

410 PRINT* 13- "M-R"CHR*<8)CHR*<3 ' 

42@ GET*'3»R*<0) IFA#<0'>"»"*THENA*<8>««Nl-* 

42« IF JJ*«"S"THEH430 

430 IF j;*="F'"THEH469 

431 PEM***************-******** ******* 

432 REM* READ S CRT BISPLAV * 

433 REN* PEST OF THE DISK BUFFER * 

434 PEfi«*«* ♦*****+**-****♦*•******♦** 
436 (=1 N8<l>»ASCCAS<8>3 

45e F np i=(3 TO 63 IF J"32 THEN OOSUB 710 IF Z*»"N"THEH J-89 GOTO 439 

440 FOR I"K TO 3 

442 0ET*2..R*(I> IF A*CI>-"*" THEN F!*CI>*NL* 

444 IF K»l AND K2 THEM NBC2>"flSC<fl*< I >) 

446 NEXT I K>0 

44i? fi*=" " Ei = N»J*4 GOSUB 790 fi#=A**" " 

459 FOR 1=0 TO 3N«RSC<'fi* ( 'T ' . GCjSUB 7?9 

432 C*=fl*'r'' GOSUB S3B B*"B*+C* 

434 NEXT I IF JJ#-"S" THEN PRINTAfBf 

458 NEXT S 00T0371 
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460 PEM« •♦*•*•*++♦♦+•#*•**•»*«* •»♦*«• 
462 FEn» PE8D * PRINTER DISFLfiV t 
4f,s PEMt** a ****«4 ••••••«• 

466 K«l MB' ] i-R5C'fl*'3i • 

466 FOP J»0 TO 1 5 

47f ?09 >K TO 15 

472 ljETH2.fl«'T ' IF F»<I>«*' THEN B«<I>«NL* 

474 IF K»] miD l<2 THEM NB(2>*RSC(F)*U>) 

476 MEKT I r-Q 

478 B*»"" BS»" " N*J*16 GOSUB 730 fi*=Rt+" " 

480 FOP t-@ TC 15 N»fiStXft*<l>>'OOSUB 790 IF Z*="N"THEH J-40 GOTO 371 

482 CI-SI'l' GOSUB 850 FI=£I+C* 

484 NEXT I 

466 IF TIJ»"R" THEM PPTNTK4 R*BS 

488 NEXT J 0OTO571 

571 FEM»«*»»« *#***•* ...........»+»»»* 

372 PEM* MEXT TFfirr flup SECTOP * 

573 P£M»*4 ••••»***♦*••••»*•• »**•*»»»» 

575 PFIKT"UE>:T TRACK FIND SECTOR "HBUJNBC 2) '*" 
5S0 PRINT 'PO i'OU WANT NESa TPRCI 0IIP SECTOR' 
590 GET Zi IF Z*-"" THEH390 

689 IP 7*="V" THEN T-ME' 1 > S-NBC2) GOTO330 
£10 IF Z*«*N" THEM '320 

620 GOTO 590 

630 PEfl+*****f **###*#*#***»********#■* 

640 REM* SUBROUTINES * 

•?30 REH*4 ********+**+* + »•«»** + »* + » + * + 

660 PEM« ERROR POUT INF ♦ 

670 PEM»*»*****4*4«****»**»****#+4*4f 

680 I NPUT * 15, EH. El-I».ET.E£ IF EH-0 THEN RETURN 

690 PPlriT"j(PI?f EPPOP"" El t- En*. ET.ES 
703 END 

710 B>EM»****«******»».»4*4»4*+«t»***t 
720 REM* SCREEN CONTINUE I1ESSRGE ♦ 

730 PE11***«"M******»****«*»»*4******* 
740 PRINT" OMMTONT I HUECV. 'N ■ " 
"50 OETrt Ip Z*""" THRU 750 
7S8 IF :»*«=" H" THEN RETURN 
770 IF Z*<>"Y" THEN 7^0 

789 PPIHT'TJTPflCl'" T " SECTOR"? "H" ^RETURN 

790 PEI1*# ♦.♦•••****#+*W** l Mf ##**»++**** 
890 FEM» DISC BVTE TO HE* PRINT ♦ 

010 =£■■».«».«....*...»..»».....♦»..*. 
320 ftl = TNT.-|| -16 ■ R*=Br+MIBJ , i'H:-:f .01 +1 . 1 . 
&3« flr=TNT'N-i6+FI] > RS»RS+MIBS 'HX*.fl?+1 O 
848 Rf=P*+SPf RETIJPN 

-■<?.-- =?■<•• <*»t*»t„..tt..t»»*tft 

860 FECI* DISK BVTE TO flSC DISPLAY * 

ft7B FFM* CHARACTER + 

800 REM****************************** 

89fl TF RSCffflOa THEN C**" " RETURN 

?10 IF ASC<C*K128 OR ASC(C*}>159 THEN RETURN 

320 CS-NIM i SSI . ■(+ ' ftSC ■->: r ■ - 1 £7 ■ , 3> PFTI IPN 
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4. CHECK DISK 



1 rem check bisk — vep 1.4 

2 EN=8=REM FLOPPV DEVICE NUJ1BER 

s Dirrr<iee>:DiMs<iea>:REM brb track, sector rprrv 

S PPINT'TTOBS " 

10 PRINT" CHECK DlSr^ PROGRflH" 
12 PRINT" " 

20 Irr-"0" 

30 0PEN15.. BN. 15 

35 PRINT* 13 -"VB* 

43 N2-RNIKT1 >#255 

50 H*="" F0RI = lT0255fi*=fi#+CHR*'C255RNBa+N;i))'NEKT 

S0 Gosusaeo 

70 0PEN2.. DN.Sj"*" 
60 PRINT:PRIHT#2-fl*; 

83 T^l -S=0 

90 PPINT*15."B-R:"B*:T;S 

tea INPUT* 13., EM,EM*.ET.ES 

119 IFEN=0THEN130 

113 IFET=OTHEN200'PEM END 

120 PRINT*15. "B-R-"B*:ET.ES T-ET ' S=£S 
130 PRINT*13."U2 : 2>"B*-.T:S 

134 HB=NB+1 ; PRINT" CHECKED BLCCKS"NB 

135 PRINT" TRRCK IMil"T:" SECTOR IMirS"TT 
140 INPUT* 15. EH.. EM*,E3-ET 

133 IF EN=9THENS5 

160 T( J>-T:SCJ>=S : J=J+1 

165 PR3NT"IWIBRB BLOCK ■ III" . T;S"" 

170 C-0TGS5 

200 PRINT*15,"I"D:r 

210 C-OSUB3O0 

212 CL0SE2 

215 IFJ«=BTHENPRINT"J8«»»*HQ BAD BLOCKS!" END 

217 OPENS. DN,2,"»" 

21 S PRINT"M«BfiD BLOCKS" . "TRACK" .■ "SECTOR" 
220 rOPI=0TriT-l 

230 PRINT#15,"E-A : " : D* ,T( I) (S< I > 

240 PRINT. .TO>,SCI> 

230 NEXT 

260 PR I NT "U" J" BAD BLOCKS HAVE BEEN ALLOCATED" 

270 CL0SE2:END 

?00 1 NPI.IT* 1 5 - EH , EM*.. ET . E3 

310 IF EN=0 THEN RETURN 

S29 PRINT "MHERROK: *"EN,EM*; ET; ES"" 

930 FRINT#13,"I"P* 
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5. PERFORMANCE TEST 



000 REM PEPFOPMRNCE TEST 2.0 

010 ■ 

020 REH VIC-20 AND COnriODOPE 64 

030 REM SINGLE FLOPPY DISK DRIVE 

040 

050 OPEN 1-8. 15 0PEN15-3- IS 

0S0 LT-33 

070 LT*=STP*<-LT> 

,\.-:Ci NT=30 

390 ppnivrifl 



li?0 PRINT" FEPFOPMRtlCE TEST" 

110 PRINT ■ — ■ ' 

1 ?0 PRINT 

1 3*1 PFTNT" INSERT SCPRTCH" 

ua PRINT 

15i? PRINT' DISKETTE III DRIVE" 

l»-"0 PP1I1T 

170 PPINT-rt PRESS SFETUFt." 

!90 PRINT 

l"?n PRINT' WHEN PEflDVU" 

20P FOP I -.3 TO 50 GET R* HE T 

21.6 OET fl* IF FWOCHPtM 3 ■ THEN 1219 

220 

240 TI*="OPCiOOfi" 

25? TT«t8 

260 PPINT#1 . '■N0-TEST DISK. 00" 

270 Cl*=" DISK MEW COMMAND "+CHR*<13> 

251? C2*="n WRIT RBOUT 80 SECONDS" 

290 CC*=Cl.r+C2J UOSUB 1SJ0 

380 IF TI :NTTHEH1370 

310 PRINT" XEVSTEM IS" 

320 PRINT"* NOT RESPOND INC" 

330 PRINT" CORRECTLY TO COfWflNDS" 

340 pnsi.lB 1850 

350 ■ 

?60 

370 PR I NT "WPP I VE PfiSS" 

330 PRINT" MECKRNICRL TESTU" 

399 TT=21 

400 OPEN 2- g. 2. "9 : TEST FILE.S,W" 

413 CC*=" OPEN WRITE FILE" GOSUB 1840 
L42P CH=2-CC**" WRITE DRTR" -GOSUB 1930 
430 CC*="CLOSE "+CC* : OOSUB 1840 

440 OPEN 2.8,2, "8 ■■ TEST FILE-S-R" 
450 CC*»"OPEN RERD FILE" -GOSUB 1S40 
460 CH=2:G0SUB 1930 
470 PRINT*! ."S0:TEST FILE" 

480 CCi="SCRRTCH FILES" TT-1 : OOSUB I840 
490 
509 - 
518 TT=21 

520 OPEN 4,8,4,"*" 
530 NN5i=f 1*RMIKTI>*S34+MNK>RN1)235 PRINT* I . "B-P" : 4 . NNK 

540 MN*= FOR 1 = 1 TO 255 : NN*=NN*+CHR*r I> -NEXT 

550 PRINT* 4. UN*: 

560 PRINT* I . "U2: ";4;0;LT.a 

570 CC*="WPITE TRRCK"+LT* GOSUB 1840 

380 PRINT*1,"U2:";4;0;1;0 

590 CC*=" WRITE TRRCK 1" 

600 PPIHTtll . "Ul : " :4 ;0;LT:0 

610 CC*="FERB TRRCK "+LT* 

620 PRIHTtl ."Ul : ";4.:0; 1:0 

630 CC*="REF)D TRRCK 1" 

640 CLOSE 4 

630 : 

660 

62 
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GOSUB 1840 
OOSUB 1840 
GOSUB 1840 



1670 PRINT"* UNIT HAS PRSSED" 

1 680 PR I NT " PERFORMANCE TEST > " 

1*80 pptMT"« PULL DISKETTE FROM" 

1730 PRINT'""! DRIVE BEFORE TURNING" 

171? PRINT" POWER OFF." 

1720 END 

1 " --. ■: 

1748 

17^8 PRINT" •CONTINUE CV/N>?"i 

1760 FOR 1-0 TO 5BKT R* NEXT 

1770 C-ET Ri'IF A*="" THEN 1770 

1780 PRINT R*"M" 

17»» IF R*»"N" THEN ENI> 

1800 IF A**"V" THEN RETURN 

1910 COTO 1 760 

1838 

1840 PRINT CCf 

1856 INPUT* l,£H,EM*.ET.ES 

I860 PRINTTflB< 12V"EN;EM*,ET;ES;'" 

1870 IF EN<2 THEN RETURN 

1:580 PRINT"'* UNIT IS FAILING" 

!830 PPIHT-B PERFORMANCE TEST" 

1900 7M*=TI* OOSUB 17^0 TI*=TM»: RETURN 

t?10 

1328 

1^80 PPINT "MP IT INC BAT A" 

i?40 FOR 1=1000 TO J0O0 PRIHT#CH, I NEXT 

I=i50 OOSUS1830 

1960 CLOSE OH RETURN 

-- .- 
1993 FP1UT"PEABIHG DATA" 

■ ■ 3ETA* 
2010 FllF 1 = 1000 TO 1000 

INPUT* TH. J 
2038 IF JOl THEN PRINT" SFERP ERROR'"" OOSUB I *3B 
£ftE*$ NEXT 
r-.-.— .-i .-.-i ■:.! IT: ■ f?36 
-p.-7- -, ,rr CH PFTNPN 
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APPENDIX D: DISK FORMATS 




NOT1- 

Not U> stale 



POINTERS TO LINK \ 

TOGETHER MJ_ BLOCKS \ 



* 




















WITHIN A FILE 




N J 


SI M 


!W 


tDI 


id; 


TRACK 


BLOCK 


CHECK- 
SI M 


GAM 


SVNC 


(17 


3 

iU 

m 


jj 

> 


254 BYTES 
Ol IJ ATA 


CHECK- 
SUM 


GAP' 



1540/1541 Format: Expanded View of a Single Sector 
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BLOCK DISTRIBUTION BY TRACK 



Track number 

I to 17 
18 to 24 
25 to 30 
31 to 35 



Block Range 


Total 


to 20 


21 


Oto 18 


19 


Oto 17 


18 


Oto 16 


17 



1540/1541 BAM FORMAT 



Track 18, Sector 0. 


BYTE 


CONTENTS 


DEFINITION 


0,1 


18,01 


Track and block of first directory block. 


2 


65 


ASCII character A indicating 4040 format. 


3 





Null Hag for future DOS use. 


4-143 




Bit map of available blocks for tracks 1—35. 


• 1 = available block 
= block not available 

(each bit represents one block) 
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1540/1541 DIRECTORY HEADER 



Track 18, Sector 0. 


BYTE 


CONTENTS 


DEFINITION 


144—161 




Disk name padded with shifted spaces. 


162—163 




Disk ID. 


164 


160 


Shifted space. 


165—166 


50,65 


ASCII representation for 2A which is DOS version 
and format type. 


166—167 


[60 


Shifted spaces. 


177—255 





Nulls, not used. 


Note: ASCII characters may appear in locations 180 thru 191 on some diskettes. 



SEQUENTIAL FORMAT 



BYTE 


DEFINITION 


0—1 


Track and block of next sequential data block. 


2—256 


265 bytes of data with carriage return as record terminators. 



PROGRAM FILE FORMAT 



BYTE 


DEFINITION 


0,1 


Track and block of next block in program file. 


2—256 


265 bytes of program info stored in CBM memory format {with key 
words tokenized). End of file is marked by three zero bytes. 
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DIRECTORY FORMAT 





Track 18, Block 1 for 1540/ 1541 




BYTE 


DEFINITION 


0-] 


Track and block of next directory block. 


2—31 


•File entry 1 


34—63 


•File entry 2 


66—95 


•File entry 3 


98— J 27 


•File entry 4 


130—159 


•File entry 5 


162-191 


•File entry 6 


194—123 


•File entry 7 


226—255 


•File entry 8 



•STRUCTURE OF SINGLE DIRECTORY ENTRY 



BYTE 


CONTENTS 


DEFINITION 





128 + type 


File type OR'cd with S80 to indicate properly closed 

file. 

TYPES: = DELeted 

1 = SEQential 

2 = PROGram 

3 = USER 

4 = RELative 


1-2 




Track and block of 1st data block. 


3—18 




File name padded with shifted spaces. 


19—20 




Relative file only: track and block for first side sector 
block. 


21 




Relative file only: Record size. 


22—25 




Unused. 


26-27 




Track and block of replacement file when OPEN® is 
in effect. 


28—29 




Number of blocks in file: low byte, high byte. 
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RELATIVE FILE FORMAT 



DATA BLOCK 


BYTE 


DEFINITION 


0,1 


Track and block of next data block. 


2—256 


254 bytes of data. Empty records contain FF (all binary ones) in the 
first byte followed by 00 (binary all zeros) to the end of the record. 
Partially Tilled records are padded with nulls (00). 


SIDE SECTOR BLOCK 


BYTE 


DEFINITION 


0—1 


Track and block of next side sector block. 


: 


Side sector number (0-5) 


3 


Record length 


4—5 


Track and block of first side seclor (number 0) 


6—7 


Track and block of second side sector (number 1) 


8-9 


Track and block of third side sector (number 2) 


10—11 


Track and block of fourth side seclor (number 3) 


12—13 


Track and block of fifth side sector (number 4) 


14—15 


Track and block of sixth side seclor (number 5) 


16—256 


Track and block pointers to 120 data blocks 
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INDEX 

A 

Assembly Language, 50 

B 

BLOCK-ALLOCATE, 30-31, 51 

Block Availability Map (BAM), 9-10, 25, 28, 30-31, 64-68 

BLOCK-EXECUTE, 45, 51 

BLOCK-FREE, 31, 51 

BLOCK-READ, 28-29, 31-32, 34-35, 51 

Blocks, 3, 34-35, 64-68 

BLOCK-WRITE, 30, 32, 34-35, 51 

Buffer, 3, 33 

BUFFER-POINTER, 33-34, 51 

C 

CLOSE, 19 
COPY. 16, 51 

D 

Data Channel, 29 

Demonstration Disk Programs, 57-63 

Device Number, 20, 48-49 

Directory, 9-10, 24-27, 66-67 

Disk Controller, 45-47 

Disk Operating System (DOS). 10-11, 13, 25-28, 31. 33. 53-56 

DOS Support Program, 13,18 

Drive Speeds, 7 

DUPLICATE, 18, 51 

E 

End-of-file (EOF), 21 
Error Channel, 18, 43-45 
Error Messages, 52-56 

F 

FORMAT (see NEW) 

G 

GET#. 23 

I 

INITIALIZE, 17, 46, 51 
INPUT**, 18, 21-22, 44 

L 

LOAD, 1, 8-15. 19 
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M 

Mailing List Program, 39-40 
MEMORY -EXECUTE, 46, 5] 
MEMORY-READ, 45, 51 
MEMORY- WRITE, 46, 51 

N 

NEW, 15,51 

O 

Open, 14-15, 20 

P 

Pattern Matching, 1 1 
POSITION, 38-43, 51 
PRINTS, 14-15, 21 
Program Files (PRO), 20, 26, 56 

R 

Random Files, 3, 28-33 

Relative Files (REL), 1, 3, 5, 20, 33-44, 68 

RENAME, 36, 51 

S 

SAVE, 1, 12, 17 

SCRATCH, 17, 51 

Sectors, 3, 64-68 

Sequential Files <SEQ), 1, 3, 5, 20-23, 26-27, 33-32, 44, 66 

Serial Bus interface, 2, 6-7 

Side Sector, 36-37 

Specifications, 2-3 

T 

Tracks, 5, 28, 33, 64-68 

U 

USER, 47, 51 

User Files (USR), 20, 26, 34-35 

V 

VALIDATE, 17, 51 

VERIFY, 13, 51 

W 

Wedge, 7 
Wild Cards, 1 1 
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COMMODORE SALES CENTERS 

Commodore Business Machines, Inc. 

1200 Wilson Drive 

West Chester, PA 19380, U.S A 

Commodore Business Machines Limited 

3370 Pharmacy Avenue, Agincourt 
Ontario, M1W2K4, Canada 

Commodore Business Machines (UK) Ltd. 

1, Hunters Road, Weldon 

Corby. Norlhants, NN17 1QX, England 

Commodore Bueromaschinen GmbH 

PO BOX 710126, Lyonerstrasse 38 
BUD0 Frankfult 71, West Germany 

Commodore Italiana 5.P.A. 

Via Fratelli Gracchi 48 

20092 Cinisello Balsamo, Milano, Italy 

Commodore Business Machines Pty Ltd. 

5 Orion Road 

Lane Cove, MSW 2066, Australia 

Commodore Computer B.V. 

Kabelweg 88 

1014 BC AMSTERDAM, Netherlands 

Commodore AG(Scheweiz) 

Aeschenvorstadt 57 
Ch-4010 Basel, Switzerland 

Commodore Computer NV-SA 

Europalaan 74 

1940 ST-STEVENS-WOLUWE, Belgium 

Commodore Data AS 

Bjerrevej 07 
Horsens, Denmark 



DISK DRIVES 

MODEL SFD 1001 

1 Megabyte double Bided, floppy disk drive. 
Uses double density, double sided diskettes. 
IEEE interface. 
MODEL 2Q31 LP 

Media compatible with 1 541 end 4O40 diskettef 
1 70 K of memory per single side disk. 
Rugged and stylish housing. 
IEEE interface. 

MODEL MPS-801 

High quality dot matrix printing. 

BO column printing. 

Prints 50 characters per second. 

Serial port interface. 
MODEL MCS-B01 

Seven color, dot matrix printing. 

Up to BO columns printed per page. 

Prints 3B characters per second. 

Perfect for everything from personal letters to important business reports. 

Serial port interface. 
MODEL 1 536 

BO column, dot matrix printing. 

Prints EtO characters per second. 

Durability at an affordable price. 

Serial Port interface. 

PRINTER/PLOTTER 

MODEL 1 5SO 

Four color, printer /plotter for all graphic needs. 
Print bar graphs. . . create pie charts. . , plot time graphs. 
High quality printing in a variety of styles and sizes. 
Great for graphic artists, 

MODEMS 

VICMODEM 

Timely financial information, news and reference lil 
An affordable introduction to the growing world of phone /computer services. 
Communicate with a wide variety of computer users who already own a modem. 
AUTOMODEM 

The convenience of automatic ansertng and dialing. 

The resource power of telecomputing services. 

Turn your phone into a telecomputing information network. 

ft commodore 

COMPUTER 
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